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IDENTIFICATION 


PRODUCT CODE:  AC-8428D-MC 

PRODUCT NAME:  CZDCADO DC11 OFLNE DIAG TST 
PRODUCT DATE: MAY 1980 

MAINTAINER: DIAGNOSTIC GROUP 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS MANUAL. 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A 
LICENSE AND MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE 
TERMS OF SUCH LICENSE. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE 
USE OR RELIAILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT 
SUPPLIED BY DIGITAL. 


COPYRIGHT (C) 1970,1980 BY DIGITAL EQUIPMENT CORPORATION 
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qe ABSTRACT 


TWO SEPARATE DIAGNOSTIC PROGRAMS ARE PROVIDED FOR THE DC-11 
(ASYNCRONOUS MODEM INTERFACE), CZDCA (DC-11 OFF LINE 

TESTS) AND CZDCB (DC-11 ON LINE TESTS). THE OFF LINE 

TESTS TEST ALL DC11 LOGIC AND MAY BE USED TO INDIVIDUALLY 

TEST UP TO 32 DC-11'S. THE OFF LINE TESTS DO NOT REQUIRE THE 
USE OF A MODEM, HOWEVER A SPECIAL JUMPER CONNECTOR IS REQUIRED. 
THE ON LINE TESTS ARE ESSENTIALLY DATA RELIABILITY TESTS RE- 
QUIRING THE USE OF MODEMS AND A SUITABLE TERMINAL DEVICE. 


THIS DOCUMENT DESCRIBES THE OFF LINE TESTS. 
THE AVAILABLE TESTS ARE: 
PRGO INPUT/OUTPUT LOGIC TESTS 
PRG1 TRANSMITTER SCOPE LOOP 
PRG2 RECEIVER SCOPE LOOP 
PRG3 SINGLE CHARACTER MAINT. MODE DATA TEST 
PRG4 SPECIAL BINARY COUNT MAINTENANCE MODE DATA TEST 
REQUIREMENTS 
2.1 EQUIPMENT 
A. PDP 11/20 SYSTEM 
B. 0C11 


C. SPECIAL JUMPER CONNECTOR (SEE DC11 MAINTENANCE MANUAL 
FOR DETAILED DESCRIPTION) 


2.2 STORAGE 


THIS PROGRAM USES ALL OF CORE (4K) EXCEPT THAT AREA RESERVED 
FOR THE BOOTSTRAP AND ABSOLUTE LOADERS. 


3. LOADING PROCEDURE 


THE ABSOLUTE LOADER IS USED TO LOAD THE PROGRAM. 
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4. USE PROCEDURE 
BEFORE STARTING ANY OF THE sehr nese eat tae > MAKE SURE 


THAT THE TTY IS IN REMOT 3 MODE ; T THE PROGRAM SELECTED 
1S A LEGAL PROGRAM,IE. SR 0-2= -& orm CRUISE PROGRAM OP- 
ERATION rs UNSPECIFIED. SRELOAD PROGRAM AND START OVER. 


4.1 PRGO INPUT/OUTPUT LOGIC TESTS 


A. LOAD sg ty wo (RESTART LOAD ADDR. = 000200) 
LOAD SR 0-2 = 0, AND PRESS START SWITCH. 
THE DIAGNOSTIC WILL IDENTIFY THE PROGAM YOU SELECTED. 
*PRGO-INPUT-OUTPUT LOGIC TESTS. DISCONNECT DC11 FROM MODEM 
AND CONNECT JUMPER TO CABLE’ 
DISCONNECT THE DC11 FROM THE MODEM AND INSERT THE JUMPER CON- 
NECTOR IN THE MODEM END OF THE CABLE,AND PRESS CONTINUE. 
NOTE, IF THE CABLE IS LEFT CONNECTED TO THE MODEM THE FOL- 
LOWING TESTS WILL FAIL: 

ATS, ATSe-ATOD, AT44,AND AT144 


B. THE tery! WILL NOW REQUEST THE LINE # (8) YOU WISH TO 
TEST. LOAD THE LINE # AS REQUESTED AND PRESS CONTINUE. 
LINE NUMBER REFERS TO THE ADDRESSES TO WHICH THE DC11 RESPONDS. 


77410X LINE 20 77420X LINE 30 77430x 
7411X LINE 21 77421X LINE 31 77431Xx 


77400X LINE 1 
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LINE 26 77426X LINE 26 77436x 


416X 
77407X LINE 17 77417X LINE 27 77427X LINE 27 77437x P 


ao Ferrrrrre 
. 


THE PROGRAM WILL TYPE OUT INSTRUCTIONS TO SET IN THE DESIRED , 
SR OPTIONS. PRESS CONTINUE WHEN THE OPTIONS ARE IN THE SR. 
THE a OPTIONS ARE: 

SR 0-6 ROUTINE TO BE RUN (IF ENABLED BY SR9) 

SRB DISABLE STALL MODE 

SRY LOOP SELECTED ROUTINE 

SR10 HALT AT END OF PROGRAM 

SR11 INHIBIT ITERATION 

SR13 ot PRINTOUT 


5R15 NALT ON ERROR. , 
D. THE PROGRAM WILL NOW BEGIN TESTING THE DC11 YOU SELECTED. ) 
E. REFER TO SECTION 5.1.2 FOR ERROR DESCRIPTION 

F. AFTER ONE COMPLETE PASS PRGEND WILL BE TYPED OUT 


4.2 PRG1 = TRANSMITTER SCOPE LOOP 
A. LOAD ADDRESS = 000200 





-MAIN. MACY11 30A(1052) 
CZDCAD.P11 10-JUN-80 


10-JUN-80 10:55 PAGE 5 
10:47 


SR 0-2 = AND PRESS START SWITCH. 
THE OTAGNOSTIC. WILL IDENTIFY THE PROGRAM YOU ak ye AND 
REQUEST THE LINE # YOU WISH TO TEST. LOAD THE LINE # AS RE- 
QUESTED AND PRESS CONTINUE. 


B. 
THE 2 WILL REQUEST THE DC11 LINE PARAMETERS. LOAD THE 


4.3 


4.5 


D. 


ARAMETERS AS REQUESTED AND PRESS CONTINUE. 


THE PROGRAM WILL REQUEST A CHARACTER CODE, AND A DELAY 

TIME. THE CHARACTER CODE IS THE DATA THE DC11 WILL TRANSMIT 
AND THE DELAY IS THE TIME ELAPSED BETWEEN SUCCESSIVE TRANS- 
MISSIONS OF CNE CHARACTER. PRESS CONTINUE WHEN THIS IS DONE. 


THE PROGAM WILL RUN WITHOUT ERROR OR END TYPEOUTS. 


PRG2 = RECEIVER SCOPE LOOP 


A. 


LOAD ADDRESS = oo 

LOAD SR 0-2 = 2, AND PRESS START. 

THE DIAGNOSTIC ditt IDENTIFY THE PROGRAM YOU ee Ee AND 
REQUEST THE LINE # YOU WISH TO TEST. LOAD THE LINE # AS REQ- 
UESTED AND PRESS CONTINUE. 


THE PROGRAM WILL REQUEST THE DC11 LINE PARAMETERS. LOAD THE 
PARAMETERS AS REQUESTED AND PRESS CONTINUE. 


bs PROGRAM WILL REQUEST A TEST CHARACTER CODE, AND A DELAY 

TIME. THE CHARACTER CODE IS THE DATA THAT THE DC11 WILL BE 
TRANSMITTINGAND THE DELAY IS THE ELAPSED TIME BETWEEN SUCCES- 
SIVE CHARACTERS. PRESS CONTINUE WHEN THIS IS DONE. 


THE PROGRAM WILL NOW RUN WITHOUT ERROR OR END TYPEOUTS. 


PRG3 - SINGLE CHARACTER MAINT MODE DATA TEST 


A. 


dD. 


wo D ADDRESS =, ey 
AND PRESS START. 

THE DIAGNOSTIC Ite IDENTIFY THE PROGRAM YOU SELECTED, AND 

REQUEST THE LINE # YOU WISH TO TEST. LOAD THE LINE # AS REQ- 

VESTED AND PRESS CONTINUE. 


THE PROGRAM WILL REQUEST THE DC11 LINE PARAMETERS. LOAD THE 
PARAMETERS AS REQUESTED AND PRESS CONTINUE. 


THE PROGRAM WILL REQUEST A TEST CHARACTER. LOAD THE TEST CHAR- 
ACTER AND PRESS CONTINUE. 


hs PROGRAM WILL NOW RUN CONTINUOSLY REPORTING ANY DATA FAIL- 
U 


PRG4 = SPECIAL BINARY COUNT MAINT. MODE DATA TEST 


A. 


LOAD ADDRESS = 000200 


SEQ 0004 
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ROUTINE 


ATO-AT3 
AT4-AT42 


Ma 
ATS2-AT63 
AT64 
AT65~-AT74 
AT75 

AT76 

A177 
AT100-AT137 


AT140 
AT141 


FP 





ERROR DESCRIPTION 





REQUEST THE LINE 
UESTED AND PRESS CONTINUE. 


B. THE PROGRAM WILL NOW REQUEST [HE DC11 LINE PARAMETERS. LOAD THE 
PARAMETERS AS REQUESTED AND PRESS CONTINUE. 


C. THE PROGRAM WILL BEGIN 3 a THE LINE YOU SELECTED. 
AND REPORT ANY DATA ERROR 
36 PROGRAM DESCRIPTIONS 
5.1 PRGO = INPUT/OUTPUT LOGIC TESTS 
THE INPUT/OUTPUT LOGIC TESTS CONSIST OF 103(8) ROUTINES WHICH 
MAY BE RUN IN SEQUENTIAL ORDER OR INDIVIDUALLY LOOPED (SEE 


SECT 4.1, C FOR SWITCH SETTINGS). THE JUMPER CONNECTOR MUST 
BE INSERTED BEFORE STARTING. 


5.1.1 ROUTINE DESCRIPTIONS 
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D SR O-2 = 4, AND PRESS START. 
THe DIAGNOSTIC WILL IDENTIFY THE PROGRAM YOU veoh AND 
# YOU WISH TO TEST. LOAD THE LINE # AS REQ- 


TESTS 

ADDRESSABiLITY OF CSRS & DBRS 

DIDDLES ALL BITS IN THE CSRS AND 
CHECKS THAT THEY CAN BE READ/WRITTEN 
PROPERLY. 

PROPER OPERATION OF RESET INSTRUCTION 
PROPER OPERATION OF READY BIT 

PROPER OPERATION OF CHAR LENGTH, SPEED 
CONTROL AND STOP CODE BITS. 

PROPER OPERATION OF DATA OVERFLOW BIT 
PROPER OPERATION OF INTERRUPTS 

DATA OVERFLOW CLEARS DONE 

ERROR CAUSES INTERRUPT 

PROPER OPERATION OF PARITY BIT 


DATA TESTS THESE TESTS TEST 
ALL POSSIBLE COMBINATIONS OF CHARACTER 


LENGTH SPEED AND STOP CODES USING MAINT. MODE. 


DATA TEST HIGH SPEED (JUMPER) 
PROPER OPERATION OF BREAK BIT 





SEQ 0005 
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9.1. 


PF 


5.3 


IF A ROUTINE FAILS AND THE INHIBIT PRINTOUT SWITCH IS NOT 
ENABLED (SR13) A PRINTOUT RESULTS. THE PRINTOUT FORMAT IS: 


P(PROG#> T(ROUTINE#) PC=(PC OF ERROR CALL) AND AN 
ADDITIONAL/MESSAGE (IF APPLICABLE) 


POO TOOS PC=XXXX INDICATING THAT TXCSR BIT 1 
WAS SET (SHOULD'VE BEEN CLEAR) 
POO T122 PC=XXXX DATA ERR S/B:---WAS--- 


INDICATING A DATA ERROR 
WHEN DC11 PARAMETERS 

WERE SET AT CHAR LENGTH=6 
SPEED=00, AND STOP CODE=1 


TO RESUME TESTING PRESS CONTINUE. IF ROUTINES 65 OR 71 
FAIL DUE TO A BAD TRAP VECTOR, I.E. THE VECTOR PROVIDED 
BY THE INTERRUPTING DC11_IS INCORRECT THE PROGRAM WILL 
HALT AND DISPLAY THE VECTOR+2 THAT WAS PROVIDED BY THE 
INTERRUPTING DC11. TO RECOVER FROM THIS TYPE OF ERROR 
IT WILL BE NECESSARY TO PUT INTO Me INCORRECT VECTOR 
ADDRESS THE ADDRESS TO RUN THE ROUTINE. I.E. ADDRESS 
ATAA AND AXAA FOR ROUTINES 65 AND 71 RESPECTIVELY. 


JUMPER CONNECTOR 


THE JUMPER CONNECTOR TESTS THOSE F/F'S, GATES (RING INDICATOR 
CARRIER TRANSITION, CLEAR TO SEND, AND SUPERVISORY RECEIVE 
DATA) WHICH CANNOT BE TESTED UNLESS A DATA SET IS ACTUALLY 
CONNECTED TO THE DC11. IN ADDITION TO TESTING DC11 LOGIC 

THE JUMPER ALSO TESTS CABLE WIRING TO/FROM THE DC11/DATA 

SET. THE Ae gee wauth WILL FAIL IF THE CABLE IS NOT 


INSALLED IN THE 0C1 


ATS ,AT34-AT42,AT44 
AT140 WILL LOOP CONTINUOSLY 


IF THE JUMPER IS REMOVED FROM THE END OF THE CABLE AND THE CABLE 
IS LEFT CONNECTED TO THE DC11 THE ABOVE TESTS WILL FAIL WITH THE 
PROBABLE EXCEPTIONS OF AT35 AND AT36. 


PRG1-TRANSMITTER SCOPE LOOP 


THE PURPOSE OF PRG1 IS TO ALLOW SCOPING OF TRANSMITT 
FUNCTIONS IN A RUN CONDITION USING USER SPECIFIED DC 
PARMATERS AND DATA. NO ERROR PRINTOUTS ARE PROVIDED. 


PRG2-RECEIVER SCOPE LOOP 
THE PURPOSE OF PRG2 IS 7O ALLOW SCOPING OF RECEIVER FUNCTIONS 


IN A RUN CONDITION USING USER SPECIFIED DC11 PARAMETERS 
AND DATA. NO ERROR PRINTOUTS ARE PROVIDED. 


ER 
11 





SEQ 0006 
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5.4 PRG3-SINGLE CHARACTER MAINT MODE DATA TEST 


PRG3_TRANSMITS, RECEIVES AND CHECKS RECEIVED DATA USING USER 
SPECIFIED DC11, 0C11 PARAMETERS, AND DATA. 


5.4.1 ERROR PRINTOUTS 
SELF EXPLANITORY ERROR PRINTOUTS ARE PROVIDED. 
5.5 PRG4-SPECIAL BINARY COUNT MAINT MODE DATA TEST 


PRG4 IS THE SAME 4S PRGO ROUTINE 77 AND 100 EXCEPT THAT 
THE USER SPECIFIES DC11 RUNNING PARAMETERS. 


5.5.1 ERROR PRINTOUTS 
SELF EXPLANATORY PRINTOUTS ARE PROVIDED. 


6.0 POWER FAIL 

A POWER FAIL ROUTINE IS INCLUDED IN THE PROGRAM. WHEN THE POWER FAILS 
THE PROGRAM WILL AUTOMATICALLY RESTART USING THE PRESENT SR OPTIONS 
AND THE LINE PREVIOUSLY SELECTED. NOTE: THE POWER MAY FAIL WHEN THE 
PROGRAM IS EXECUTING A ‘RESET’ INSTRUCTION, IN THIS CASE OPERATOR 
INTERVENTION IS NEEDED TO PRESS CONTINUE. AN ERROR TYPEOUT RESULTS 
AND WILL TYPE THE PROGRAM #, THE ROUTINE THAT WAS RUNNING AT THE TIME 
4 ors FAILED (PROGRAM 0 ONLY), AND THE PC OF THE POWER FAIL ER- 


P(PRG#) T(ROUTINE #) PC = (ADDRESS OF ERROR CALL) 


7.0 ECO HISTORY 


CHGD1 = CHANGED LOCATION FOR SETTING STACK POINTER is OCCUR 
BEFORE JSR COMMAND IS GIVEN TO PREVENT PROGRA 
FROM TRAPING OUT DUE TO YELLOW OR RED ZONE VIOLATIONS. 


DC11 DATA 


CHRAHARAHAAAHA HAAR RAHA EAAA KAKA H AAA HATTA TATA AEA e Tee eee eee eee Kee 
LINE # * UNIT# * RXCSR ADRS. * FREQS. * TELEPHONE * REMARKS 
(CUST ID) *(DEC ID)* RX VECTOR * AVAILABLE * NUMBER * 


REAR AAARERRAAAAAAAAAAAAARARAAAAAAEREEAAAAATAAAAEAAAeeA eee 


* ® ® ® w 

* * t t * 

« *® * t * 
REKAAAEAAHSRARERAAAAAARAAAAEAAAA RAAT AAATARAAAAEAEEA TEARS 

# * ® * a 

® t « * * 

Y ® t ® a 
RRERAAHAAAHARARAARERAREAARAAAARARERAAAAEARARAERAAAETHATAERAAAERARER ARATE 

w * a7 t 4% 

# * ft t t 


* * a * * 





—-+4 
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RRR EERE REE ERA REREREEEE EAE EERE ARERR ERRERERE RARER 
© ® * 8 & 
s * * % 
& * * * 

RRR ERR REE E REE A RRR ERE REA ARRRERREREEEEEEEEE TERETE RERER AREER EEE 
8 & e t * 
* ® * * * 
e © ® % e 

RRR RRER EERE EEE RARE EEE EEEEEEETERERAERERER EEE 
& ® & * * 
© as & t & 
e % & & * 

RRR ERR EERE RARER ERE REE AERA REA EEE EERE TREK RARAE REE 
* & * + 
* * © x * 
. * ® * % 

RRR ERR RARER EERE REE R ERATE REAR EEERRERERE ERE 
s © * 4 & 
* & s * & 
% * & « © 

POU TTTITELITE TLL ELLE LEE 
® # S 4 * 
* * * * * 
* ® & * * 

POSTE TIETIETILIE LALA LEE. 
© + * * 
& & & % * 
® * te s ® 

POO UTTETITTELELILELIL CALLE LLL 
* ® ® * * 
* * * % 
e & & * * 

RRR RTE E REE RRER RRAEE ATER REET ERE EERE 
* & & * % 
* 8 t * ® 
* * « e tt 

RRR RR ER RERAR ER ARARARAAERAEERAEAAAAAAA ETRE ReR eRe RRA, 


a 
LIST SEQ,BIN 
pet DIAGNOSTIC PROGRAM (OFF LINE TESTS) 


: COPYRIGHT rast . 1980 Me» peta CORP., MAYNARD, MASS. 


] 
— 
z 
v 
Ge. 

t 
Cc 
—- 
wv 
« 
—_ 
oO 
i>) 
— 
o 
~« 


:PRG1- TRANSMITTER SCOPE LOOP 
sPRG2- RECEIVER SCOPE LOOP 


;PRG3- SINGLE CHARACTER MAINTENANCE MODE DATA TEST 
SPECIAL BINARY COUNT MAINTENANCE MODE DATA TEST 


;PRG4- 
; STANDARD SR SWITCH OPTIONS (SWITCH SET TO A 1 ) 


'SR15- HALT ON ERROR 

;SR14- SCOPE. 

7SR13- INHIBIT PRINTOUT 

:SR12= INHIBIT TRACE 

:SR11- INHIBIT ITERATION. 

:SR10- HALT o re OF PROGRAM 

:SR9= SELECT ROUTINE. 

;SR8- DISABLE STALL MODE AND RUN FULL SPEED. 


SEQ 0008 
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431 :SR6 THROUGH SRO - NUMBER OF ROUTINE TO BE SELECTED. 
3 :DATA TEST PARAMETERS 
434 ; CHAR LENGTH SPEED STOP CODE 
435 :NOTEO 8 00 2 
436 :NOTE1 7 00 2 
437 :NOTE2 6 00 2 
438 sNOTE3 5 00 2 
439 sNOTES a 01 2 
440 :NOTES 7 01 2 
441 sNOTE6 6 01 2 
442 > sNOTE7 5 01 2 
443 :NOTE10 8 10 2 
444 :NOTE11 7 10 2 
445 sNOTE12 6 10 2 
445 sNOTE13 5 10 2 
447 sNOTE14 8 11 2 ; 
448 sNOTE15 7 11 2 
449 sNOTE16 6 11 2 
450 sNOTE17 5 11 2 
451 :NOTE20 8 69 1 
452 sNOTE21 7 00 1 
453 sNOTE22 6 00 1 
654 :NOTE23 5 00 1 
455 sNOTE24 a 01 1 
456 sNOTE25 7 01 1 
457 sNOTE26 6 01 1 
458 :NOTE27 5 01 1 
459 sNOTE30 8 10 1 
460 :NOTE31 7 10 1 
461 sNOTE32 6 10 1 
462 :NOTE33 5 10 1 
463 sNOTE34 & 11 1 
464 sNOTE35 7 11 1 
465 :NOTE 36 6 11 1 
466 :NOTE37 5 11 1 
467 : 

468 ; .LIST  ®BIN,SEQ 
469 600000 .=0 
470 000000 000002 .+2 :UNASSIGNED TRAP 
471 000002 000000 HALT 
472 000004 000006 MACHER: .+2 :SP OVERFLOW, BUS ERROR TRAP 
473 000006 000000 HALT 
474 000010 000012 .+2 sRESERVED INSTRUCTION TRAP 
475 000012 000000 HALT 
476 000014 000016 .+2 : TRACE TRAP 
477 000016 000000 HALT 
478 000020 000022 +2 : TRAP TO CALL I0X 
479 000022 000002 2 
480 000024 000026 .+2 :POWER FAIL TRAP 
481 000026 000000 HALT 
482 000030 002112 EMTINT :EMT TRAP 
483 000032 000340 PRTY7 
34 003 .+2 
485 000000 HALT 
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; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 


PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 


ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 


SEQ 0010 
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747 

HALT 

.+ 
HALT 
+ 
HALT 
+ 


; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 
; TRAPPED 


; TRAPPED 


PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 


ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 
ADDRESS. 








SEQ 0011 


-MAIN. MACY11 eS NS ca 10:55 PAGE 13 


CZDCAD.P11 10-JUN-80 SEQ 0012 
599 sEQUATE STATEMENTS 
600 177570 $R=177570 
601 177776 CC=177776 
602 177776 PSW=177776 
603 001076 SPBOT=1076 
604 000240 NOP=240 
605 000000 OPEN=0 

100000 MANUAL=B1T15 
607 100000 B1T15=100000 
608 040000 B1T14=40000 
609 020000 B1T13=20000 
610 010000 B1T12=10000 
611 004000 B1T11=4000 
612 002000 B1T10=2000 
613 001000 B1T9=1000 
614 000400 B1T8=400 
615 000200 B1T7=200 
616 000100 B1T6=100 
617 000040 B1T5=40 
618 000020 B1T4=20 
619 000010 BIT3=10 
620 000004 BIT2=4 
621 000002 BIT1=2 
622 000001 BITO=1 
623 005726 POPSP=5726 ;POP THE STACK. SAME AS TST (6)+ 
624 022626 POPSP2=022626 ;POP STACK TWICE. SAME AS CMP (6)+,(6)+ 
625 000340 PRTY7=340 ;PRIORITY LEVEL DEFINITIONS 
626 0300 PRTY6=300 
627 0240 PRTY5=240 
628 000200 PRTY4=200 
629 000140 PRTY3=140 
630 000100 PRTY2=100 
631 000040 PRTY1=40 
632 000000 PRTYO=0 
633 104000 TYPE=EMT+0 
634 104001 TYPES=EMT+1 
635 104002 STALL=EMT+2 
636 104903 ERROR=EMT+5 
637 104004 DATCHK=EMT+4 
638 104005 CHALT=EMT+5 
639 104006 STRXV=EMT+6 
640 104007 STTXV=EMT+7 
641 104010 EHALT=EMT+10 
642 104011 SRESET=EMT+11 
643 104012 SCOPE=EMT+12 
644 104013 SAVREG=EMT +15 
645 104014 RSTREG=EMT+14 
646 404015 ERROR1=EMT+15 
647 104016 DELAY=EMT+16 
648 000007 BELL=007 
649 177777 ATLAST==-1 
650 
651 
652 000200 -=200 
653 000200 000167 001356 JMP START GO TO START OF PROGRAM. 
654 001100 -=1100 
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PRGTAB: 


EMTTAB: 


10:55 PAGE 14 


174000 


:PRGO START 
;PRG1 START ADDRESS 
3PRG2 START ADDRESS 
;PRG3 START ADDRESS 
;PRG4 START ADDRESS 

POINTER TO TYPEOUT ROUTINE 

sPOINTER TO CHAINED MESSAGES ROUTINE 
;POINTER = RANDOM STALL ROUTINE 
POINTER 1U ERROR ROUTINE 





SEQ 0013 


sRECEIVER CSR 


: R 
RECEIVER feet 


TRANSMITTER 
[TRANSMITTER PRIORITY LEVEL 
ZLSR CSR 
SLSR BUFFER 
P CSR 


LSP BUFFER 
sLSR INTERRUPT VECTOR 


LEVEL 
;CONTAINS CURRENT PROGRAM# 


;CURRENT PROGRAM START ADDRESS. 
[CONTAINS ADOR OF CURRENT TEST. 


SCONTAINS CURRENT TEST #. 


CONTAINS ADDR OF NEXT TEST. 
[CONTAINS CURRENT ITERATION COUNT 
: CONTAINS Yow POINTER. 


> 
i=J 
So 


> 
= 


POINTER TO ERROR HALT ROUTINE. 
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CZDCAD.P =JUN-80 10:47 SEQ 0014 
711 001246 000000 CTRA: OPEN 
rN 001250 000000 CTRB: OPEN 
71 0o1¢5¢ 000000 CTRC: OPEN 
714 001254 000000 CTRD: OPEN 
715 001256 000000 TXCSRT: OPEN 
716 001260 000000 RXCSRT: OPEN 
717 001262 000000 RXBUFT: OPEN 
718 001264 TEMP: OPEN 
719 001266 RT: “OPEN 
720 001270 177740 STLMSK: 177740 
721 001272 104000 SETSR: TYPE sTYPE SELECT OPTION MESSAGE. 
722 001274 016433 ASETSR 
723 001276 000000 HALT ; COMMON HALT. 
724 001300 000207 QTs 17 XI 
725 001302 104000 INCRTN: TYPE ‘TYPE’ INCORRECT ROUTINE SELECTED. 
726 001304 016531 AINCRT 
727 001306 000000 HALT : COMMON HALT. 
728 001310 000207 RTS 17 EXIT. 
729 001312 104000 PRGEND: TYPE ; TYPE PROGRAM END. 
730 001314 016566 APGEND 
731 001316 032767 002000 176244 BIT #BIT10,SR ;TEST END OF PROGRAM HALT OPTION 
732 001324 001401 BEQ +h ‘BRANCH IF NOT SELECiED 
733 001326 000000 HALT 
734 001330 000207 RTS 17 EXIT. 
736 sCONDITIONAL ERROR HALT ROUTINE. 
737 001332 005767 176232 EHLT: TST SR sCHECK FOR HALT ON ERROR. 
738 001336 100001 BPL EHLTA sBRANCH IF NO HALT DESIRED. 
739 001340 000000 HALT ‘HALT. 
740 001342 000002 EHLTA: RTI ‘IN DATA LIGHTS. 
742 ‘hd “Ss ROUTINE. 
743 001344 026767 177660 177660 dT CHK CRBUF ,CRBUFA ;COMPARE EXPECTED AND RECEIVED 
744 001352 001414 Bre DITCH HKA :CHARS. BRANCH IF SAME. 
745 001354 004567 001720 JSR %5,O0ACNV :60 TO OCTAL TO ASCII CONVERT. 
746 001360 001230 CRBUF ;SOURCE ADDR. 
747 001362 016424 AWAS ;DESTINATION ADDR. 
748 001364 000003 3 : #OF DIGITS TO CONVERT 
749 001366 004567 001706 JSR %5,OACNV 3GO0 TO OCTAL TO ASCII CONVERT. 
750 001372 001232 CRBUFA : SOURCE ADDR. 
751 001374 016412 AASB “DESTINATION ADDR 
752 001376 03 3 : #OF DIGITS TO CONVERT. 
753 001400 104015 ERROR! 
754 001402 016371 ERDAT 
755 001404 000002 DICHKA: RTI : EXIT. 
756 
001406 012767 177777 000126 ERR: MOV #-1,ERRB ;SET UP ONE MESSAGE CALL. 
001414 012767 000240 000122 MOV #240, ERRB+2 
061422 005067 000132 CLR ERRE 
001406 000413 BR ERRA 
0014 011667 000106 ERR1: MOV @%6,ERRB sDEVELOP ADDT'L MESSAGE ADDR. 
001434 017767 000102 000100 MOV @ERRB,ERRB ;STORE AT ERRB. 
001442 012767 177777 000074 MOV 4-1 ,ERRBY2 
001450 012767 000002 000102 MOV #2, ERRE 
001456 032767 020000 176104 ERRA: BIT #B1T13,SR ; INKIBIT ERROR PRINT? 
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CZDCAD.P11 —- 10=JUN-80 10:47 SEQ 0015 
767 001464 001630 BNE ERRC :BRANCH TO INHIBIT PRINT. 
768 001466 011667 000064 MOV 926 ,ERRD “DEVELOP CALLING ADDR. 
769 001472 162767 000002 000056 SUB #2,ERRD 
770 001500 004567 001574 JSR 15 OACNV :GO TO OCTAL TO ASCII CONVERT. 
771 001504 001556 ERRD :SOURCE ADDR. 
772 001506 015300 APC ‘DESTINATION ADDR. 
773 001510 000006 6 :#OF DIGITS TO CONVERT 
774 001512 004567 001562 JSR %5,0ACNV 360 TO OCTAL TO ASCII CONVERT. 
775 001516 001140 PRGNUM :SOURCE ADDR. 
776 001520 015263 APNUMB ‘DESTINATION ADDR. 
777 001522 000002 2 :#OF DIGITS TO CONVERT 
778 001524 004567 001550 JSR %5,,0ACNV 3GO TO OCTAL TO ASCII CONVERT. 
779 001530 001146 RTNNO ;SOURCE ADDR. 
780 001532 015271 ATNUMB DESTINATION ADDR. 
781 001534 000003 3 :#OF DIGITS TO CONVERT. 
782 001536 104001 TYPES ; TYPE: 
783 001540 015260 EMO SERROR HEADER 
784 001542 000000 ERRB: OPEN ;ADDT'L ERROR * MESSAGE IF ANY. 
785 001544 177777 -1 
786 001546 104010 ERRC: EHALT ;GO ERR HALT IF DESIRED. 
787 001550 066716 000004 ADD ERRE ,a%6 
788 001554 000002 RTI EXIT. 
789 001556 000000 ERRD: OPEN 
790 001560 000000 ERRE: OPEN 
792 
793 001562 CHGD1: 
794 001562 012706 001076 START: MOV #SPBOT,%6 ;SET BOTTOM OF “3 STACK. 
795 001566 004767 000352 JSR PC ,DCACHE ‘DISABLE CACHE ;;4+4C 
796 001572 005067 176200 CLR PSW 
797 001576 012767 000006 176200 MOV #6 MACHER 
798 001604 005067 177336 CLR RTNNO 
799 001610 016700 175754 MOV SR, %0 :(SR) TO RO 
800 001614 042700 177770 BIC #177770, %0 ‘LIMIT (SR) TO puts 3-0 
801 001620 010067 177314 MOV %0,PRGNUM ;SAVE PROGRAM # 
802 001624 006300 ASL x0 
803 001626 012767 003644 176170 MOV #PFAIL,24 
804 001634 012767 000340 176164 MOV #PRTY?.26 
805 001642 000170 00115 JMP @PRGTAB(O) 3G0 TO SELECTED PROGRAM. 
806 001646 016767 177270 177274 GETRDY: MOV aE NXTST ;ADDR OF 1ST ROUTINE TO NXTST 
807 001654 012767 000006 176122 GTRDYX: MOV #6, MACHER ‘RESET MACHER TRAP. 
808 001662 005067 176110 CLR PSW 
809 001666 012706 001076 MOV #SPBOT, %6 :SET BOTTOM OF STACK. 
810 001672 104011 SRESET SISSUE RESET. 
811 001674 004767 000142 GTRDYA: JSR 17, FORWD :ROLL FORWARD TO ‘NEXT’ ROUTINE. 
812 001700 032767 001000 175662 GIRDYB: BIT #BiT9,SR :CHECK SELECT ROUTINE SWITC 
813 001706 001003 BNE GTROYC ‘BRANCH IF SELECT ROUTINE SUITCH IS SET. 
814 001710 000177 177230 JMP @CURTST :GO RUN CURRENT ROUTINE. 
815 001714 000437 BR CHNB [NO GO. MANUAL RTN BYPASSED. 
816 001716 016700 175646 GTRDYC: MOV §R, 20 *(SR) TO RO 
817 001722 042700 177600 BIC #177600,%0 MASK UNDESIRED BITS 
818 001726 126700 177214 CMPB  —s- RTNNO,, 20 [COMPARE RTNNO TO (RO) 
819 001732 901002 BNE GTRDYD ‘BRANCH IF ROUTINE NOT FOUND YET. 
820 001734 000177 177204 JMP aCuURTST :G0 RUN ROUTINE. 
821 001740 022767 177777 177202 GTRDYD: CMP #-1,NXTST CHECK FOR LAST ROUTINE. 
822 001746 001352 BNE GTROYA ‘BRANCH TF NOT LAST ROUTINE. 
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001750 004767 177326 JSR 47, INCRIN sYES. ‘wa ROUTINE SELECTED. 
001754 000734 BR GETRDY ‘ST ART OVER. 
001756 032767 040000 175604 CHAINN: BIT #B1T14,SR > CHECK FOR SCOPE OPTION. 
001764 001403 Q CHNA ‘BRANCH IF SCOPE SW NOT SET. 
001766 016716 177162 CHNAB: MOV SCOPTR,a%6 ‘SET UP TO RETURN TO ROUTINE. 
001772 000002 = Rit sRETURN TO ROUTINE. 
001774 032767 004000 175566 CHNA: BIT #BIT11,SR ;TEST INHIBIT ITERATION SWITCH 
002002 001003 BNE CHNAA :BRANCH IF INHIBIT ITERATION SW SET. 
002004 005367 177142 DEC ICTR sDECREMENT ITERATION COUNT. 
002010 001366 NE HNAB ;BRANCH IF COUNT NOT 0. 
002012 022626 CHNAA: POPSP2 sPOP STACK TWICE 
002014 032767 001000 175546 CHNB: BIT #B1T9,SR ;CHECK SELECT ROUTINE SWITCH 
002022 001311 BNE GETRDY ;BRANCH IF SELECT RTN SW SET 
002024 022767 177777 177116 CMP #-1,NXTST sLAST TEST? 
002032 001310 BNE GTRDYX s;BRANCH IF NOT LAST TEST. 
002034 004767 177252 JSR %7,PRGEND PROGRAM END. 
002040 9000702 BR GETRDY 
2042 016705 177102 FORWD: MOV NXTST,%5 ADDR OF NEXT ROUTINE TO RS. 
002046 012567 177074 MOV (5)+,RTNNO ;GET NEXT ROUTINE NUMBER 
002052 012567 177072 MOV (5)+,NXTST GET ADDR OF NEXT NEXT ROUTINE. 
002056 012567 177070 MOV (5)+,1CTR :GET ITERATION COUNT 
2062 012567 177066 MOV (5)+,SCOPTR ‘GET SCOPE LOOP ENTRY POINTER. 
2 010567 177052 FORWDA: MOV %5,CURTST ADDR OF NOW CURRENT TEST TO CURTST. 
002072 000207 -.  Oy9 47 SEXIT FORWD SUBROUTINE . 
002074 012767 177777 #177052 FORWDB: MOV #-1,SCOPTR :FORCE ‘'NO SCOPE'' 
002102 012767 000001 177042 MOV #1,1CTR FORCE I COUNT OF 1 
002110 000766 aR FORWDA 
002112 011646 EMTINT: MOV a%6,-(6) ;GET SAVED PC. 
002114 162716 000002 SUB #2,a%6 :DECREMENT PC BY 2. 
002120 017616 000000 MOV a(6) ,a%6 
002124 006316 EMTA: ASL ax6 sEMT ARG X 2. 
002126 042716 177001 BIC #177001 ,a%6 sREMOVE 7 MSB. 
002132 062716 001170 ADD #EMTTAB,a%6 :FORM EMT RTN ADDR. 
002136 017616 000000 MOV ty a 
002142 000136 JMP a(6)+ :GO TO EMT ROUTINE. 
; SUBROUTINE TO SIZE FOR AN 11/70 CENTRAL PROCESSOR soot 
; IF IT IS AN 11/70 CPU, CACHE WILL BE DISABLED 
; IF NOT AN 11/70 CPU, NO ACTION TAKEN 
CALLED BY JSR PC ,DCACHE 
: NO ARGUEMENTS PASSED 
002144 013746 000004 DCACHE: MOV a4 ,-(SP) SAVE TRAP INFO 
002150 012737 002172 000004 MOV #1$,a04 ;SETUP FOR TIMEPUT 
002156 005737 177746 TST 4177746 TEST FOR CACHE 
002162 012737 000014 177746 MOV #14,a8177746 DISABL E CACHE 
002170 000401 BR 23 EXIT, CACHE DISABLED. 
002172 022626 1$: CMP (SP)+,(SP)+ “CLEAN UP STACK 
002174 012637 000004 23: MOV (SP)+,a84 
002200 000207 RTS PC sRETURN 
in REGS 0 TO 4 SUBROUTINE. 
002202 012667 000030 SAVRG: MOV (6)+,SVRPC ;SAVE PC AND PSW. 


SEQ 0016 
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MOV (6)+,SVRPSW 
MOV 44,-(6) SAVE REGS 0 - 4 
MOV %3,-(6) IN STACK, 
MOV %42,-(6) 
MOV 41,°(6) 
MOV %0,-(6) 
MOV SVRPSW,- (6) sRESTORE PC AND PSwW. 
MOV SVRPC,-(6) 
RTI sEXIT. 
SVRPC: OPEN 
SVRPSW: OPEN 
sSESTORE REGS 0 TO 4 SUBROUTINE. 
RSTRG: MOV (6)+,RSTPC ;SAVE PC AND PSwW. 
MOV (6)+,RSTPSW 
MOV (6)+,%0 ;RESTORE REGS 0 - 4 
MOV (6)+,%1 “FR OM STACK. 
MOV (6)+,%2 
MOV (6)+,%3 
MOV (6)+,%4 
MOV RSTPSW,-(6) sRESTORE PC AND PSW. 
MOV RSTPC,-(6) 
RTI sEXIT 
RSTPC: OPEN 
RSTPSW: OPEN 
;ROUTINE TO SET nity stp INTERRUPT VECTOR AND PRIORITY 
STLSRV: MOV a(6),STPRA+2 sMOVE VECTOR ADDR TO STPRA+2 
ADD #2,a%6 SET UP EXIT 
MOV RXVTR,%1 
STPRA: MOV #OPEN,(1)+ ;SET VECTOR ADDRESS 
art RXLVL,(1)+ :SET PRIORITY 
sROUTINE TO SET TRANSMITTER INTERRUPT VECTOR AND PRIORITY. 
STLSPV: MOV a(6),STPPA+2 sMOVE VECTOR ADDR TO STPPA+2 
ADD #2,a%6 ‘SET UP EXIT 
MOV TXVTR,2%1 
STPPA: MOV #OPEN, (1)+ ;SET VECTOR ADDRESS. 
44 TXLVL,(1)+ | aceaaaals 
sROUTINE TO ISSUE RESET. ; 
SRSETT: MOV #52525,%0 ;DATA TO RO. 
COM : COMPLEMENT (RO). 
MOV 40, SRSETT+2 (RO) TO SRSETT+#2. 
RES + ISSUE RESET. (RO) IS 
JSR PC ,DCACHE DISABLE CACHE. ;;++C 
QTl ‘DISPLAYED. EXIT. 
RANDOM WUMBER GENERATOR. ROUTINE EXITS WITH NUMBER IN REGISTER 0. 
RNGEN: MOV RP1,%0 
ROL 
ROL 10 
ADD RP2,2%0 
MOV 20,RP1 
ROL x0 
ROL 





x0 
RP2,%0 


SEQ 0017 
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935 002434 006100 ROL 0 
936 002436 006100 ROL 20 
937 002440 010067 000010 MOV 10, RP2 
938 002444 016700 000002 ‘MOV RPI, %0 
939 002450 900207 PE ee RTS :EXIT. NUMBER IN RO 
940 002452 001233 “RPI? 1233 
941 002454 007622 RP2: 7622 
942 £ SUBROUTINE TO OUTPUT ASCII MESSAGE ON TELETYPE PRINTER 
943 002456 011600 TYP a%6,%0 :GET ADDRESS THAT CONTAINS MESSAGE ADDRESS. 
944 002460 062716 000002 ADD #2,a%6 :SET XIT. 
945 002464 011000 MOV ax6,%0 * ADDRESS OF MESSAGE TO RO. 
946 002466 112067 000104 TYPA: MOVB  (0)+#,TYPDAT :GET CHARACTER 
947 002472 122767 000100 000076 CMPB ss #100, TYPDAT “CHECK FOR’ CHARACTER 
948 002500 001001 BNE TYPC ‘BRANCH IF NOT''a'’. 
949 002502 000002 RTI : TERMINATOR CHAR. DONE. EXIT. 
950 002504 122767 000045 000064 TyYPC:  CMPB 45 TYPDAT i CHECK F R's", 
951 002512 001416 BEQ TYP : BRAN ee 
952 002514 122767 000043 000054 CMPB HS, TYPDAT ‘NOT’ TEE CK FOR''#'', 
953 002522 001417 BEQ “BRANCH IF ‘‘#"' 
954 002524 004767 000002 JSR yr ep TYPE CHAR IN TYPDAT 
955 002530 000756 BR TYPA 
956 002532 116777 000040 176366 TYPD: MOVB  TYPDAT,aTPB :OUTPUT CHARACTER TO PRINTER 
957 002540 105777 176360 TSTB. ss aT PS ‘WAIT FOR DONE FLAG. 
958 002544 100375 BPL er 
959 002546 000207 RTS 17 EXIT 
960 002550 112767 000015 000020 TYPF: MOVB #15, TYPDAT sMOVE ogee RETURN CODE TO TYPDAT 
961 002556 004767 177750 JSR 417, TYPD :GO TYPE CHAR 
962 002562 112767 000012 000006 TyPG: MOVB 4#12,TYPDAT ‘MOVE LF CODE TO TYPDAT. 
963 002570 004767 177736 JSR %17,TYPD :GO TYPE CHAR. 
964 002574 000734 BR TYPA 
965 002576 000000 TYPDAT: OPEN 
966 ; SUBROUT INE TO OUTPUT A SERIES OF ASCII MESSAGES ON TELETYPE PRINTER 
967 002600 011600 YPS: MOV a%6,%0 ;GET ADDRESS THAT CONTAINS MESSAGE ADDRESS 
968 002602 062716 000002 ADD #2,a%6 ‘UPDATE TO NEXT MESSAGE ADDRESS 
969 002606 011067 000014 MOV ax, TYPSB ‘ADDRESS OF MESSAGE TO TYPSB 
970 002612 022767 177777 000006 CMP #-1_TYPSB ‘CHECK FOR TERMINATOR 
971 002620 001001 BNE TYPSA ;BRANCH IF NOT TERMINATOR. 
972 002622 000002 RT] ‘TERMINATOR, EXIT 
973 002624 104000 TYPSA: TYPE ‘CALL ON TYP SUB TO TYPE MESSAGE 
974 002626 000000 TYPSB: OPEN ‘ADDRESS OF MESSAGE GOES HERE 
975 002630 000763 BR TYPS :GO PROCESS NEXT MESSAGE 
977 002632 012701 000300 OVRLAY: MOV #300,%1 :GET DC11 VECTOR BASE ADDRESS 
978 002636 012702 000302 MOV #302,%2 “GET NEXT ADDRESS 
979 002642 010221 OVRLYA: MOV 12, (1)+ “LOAD VECTOR WITH ADDRESS OF NEXT ADDRESS 
980 002644 005021 CLR (15+ ‘PUT A HALT IN THE NEXT ADDRESS 
981 002646 020267 176126 CMP 42,1000 “ALL VECTORS BEEN LOADED 
982 002652 001403 BEQ OVRLYB 
983 002654 062702 000004 ADD #4 ,%2 :GET NEXT VECTOR ADDRESS 
984 002660 000770 BR OVRLYA 
985 002662 000207 OVRLYB: RTS ? EXIT 
987 :SUBROUTINE TO DELAY A SPECIFIED NUMBER OF MILLISECONDS 
988 002664 011667 000040 DLY: MOV a%6 ,DLCNT :GET DELAY COUNT ADDRESS. 
989 002670 062716 000002 ADD #2,a%6 ‘SET UP EXIT ADDRESS 
990 002674 017746 000030 MOV aDLCNT,-(6) “DELAY COUNT TO STACK 
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991 002700 001411 BEQ DLYC 
992 002702 005067 175070 CLR PSw :SET PRIORITY 0 
993 002706 012746 000554 DLYA: MOV #554,-(6) :1 MSEC COUNT TO STACK 
994 002712 005316 DLYB: DEC ax6 ‘DECREMENT 1 MSEC COUNT 
995 002714 001376 BNE DLYB :BRANCH IF NOT 0. 
002716 005726 POPSP =ZERO. UNCOVER MSECS. COUNT. 
997 002720 005316 DEC ax6 “DECREMENT IT 
998 002722 001371 BNE DLYA :BR IF NOT DONE DELAYING 
999 002724 005726 DLYC: POPSP : DONE 
1000 002726 000002 RTI sEXIT. 
1001 002730 000000 DLCNT: OPEN sCONTAINS MILLISECONDS COUNT ADDRESS. 
1002 ;SUBROUTINE TO STALL A RANDOM NUMBER OF MILLISECONDS. MAXIMUM STALL 
1003 “DETERMINED BY CONTENTS OF LOC STLMSK. 
1004 002732 004767 177446 STAL: JSR %7,,RNGEN :GO GET RANDOM NUMBER. 
1005 002736 046700 176326 BIC STLMSK,%0 3# IN RO. APPLY STALL MASK. 
1006 002742 001404 BEQ STALB “BRANCH IF RESULT IS 0. 
1007 002744 010067 000002 MOV %0,STALA 
1008 002750 104016 DELAY :DELAY 
1009 002752 000000 STALA: OPEN :DELAY COUNT 
1010 002754 000002 STALB: RTI sDONE. EXIT. 
1011 sSUBROUTINE TO GENERATE RANDOM CHARACTER COUNT 
1012 002756 004767 177422 GRCNT: JSR 47, RNGEN :GET RANDOM NUMBER 
1013 002762 046700 000010 BIC RCMSK, 20 “APPLY MASK 
1014 002766 001773 BEQ GRCNT :TRY AGAIN IF RESULT 0 
1015 002770 010067 000004 MOV %0,RNCNT “COUNT TO RNCNT 
1016 002774 000207 RTS 47 sEXIT. 
1017 002776 000000 RCMSK: OPEN ;RANDOM CHARACTER MASK. 
1018 003000 000000 RNCNT: OPEN sRANDOM CHARACTER COUNT. 
1019 :SUBROUTINE TO SELECT LINE AND 
1020 003002 104000 LINSEL: TYPE 
1021 003004 017010 LDLINE 
1022 003006 000000 HALT 
1023 003010 016701 174554 MOV 
1024 003014 042701 177407 BIC #177407,%1 
1025 003020 010167 176240 MOV 11, TEMP 
1026 003024 012702 000770 MOV #770,%2 
1027 003030 012703 001100 MOV #RXCSR,X3 
1028 003034 012704 000004 MOV #4 %4 
1029 003040 040213 BIC %2,(3) 
1030 003042 050123 BIS %1,(3)+ 
1031 003044 005304 DEC 14 
1038 003046 001374 BNE .-6 
1033 003050 006201 ASR 11 ;POSITION SELECTED LINE 
1034 003052 006201 ASR 11 : 
1035 003054 016101 015160 MOV VECTAB(1),%1 =GET LINE VECTOR ADDRESS 
1036 003060 010167 176024 MOV X11, RXVTR LOAD INTO PROGRAM RXVTR 
1037 003064 022121 CMP (1)+,(1)¢ [ADD +4 
1038 903066 010167 176022 MOV Z1,TXVTR =LOAD INTO PROGRAM TXVTR 
1039 003072 006267 176166 ASR TEMP 
1040 003076 006267 176162 ASR TEMP 
1041 003102 006267 176156 ASR TEMP 
1042 003106 004567 000166 JSR 5, OACNV ; TYPE LINE @ 
1043 003112 001264 TEMP 
1044 003114 061 SEL INE 
1045 003116 2 
1046 003120 000 TYPE 
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55 PAGE 21 
SEQ 0020 
sit 5 
;SuBROUT INE TO INITIALIZE BINARY COUNT PATTERNS 
NBIN: MOV #-1,RIND :SET ALL VARIABLES 
JSR 45 ,BMOVE :TO MINUS 1. 
RIND 
RIND+1 
iM. 
RTS 47 EXIT 
RIND: OPEN 
PTO: OPEN 
FT1: OPEN 
PIND: OPEN 
PTOP: OPEN 
PTIP: OPEN 
:SPECIAL BINARY COUNT PATTERN SUBROUTINE. EXITS WITH BIN CHAR IN RU 
GTBIN: MOV PTO,PT1 :PREVIOUS BIN CHAR TO PT 
COM 11 
COM RIND 
BNE +6 
INC PT} 
BIC #177400,PT1 :MASK TO 8 BITS 
MOV PT1,PTO “SAVE BIN CHAR IN PTO 
MOV PT1,%0 “BIN CHAR TO RO. 
RTS 17 SEXIT. 
GTBINP: MOV PTOP,PTIP “PREVIOUS BIN CHAR TO PTIP 
COM PTIP 
COM PIND 
BNE .+6 
INC PTIP 
BIC #177400 PTIP «ss MASK TO 8 BITS. 
MOV PTIP,PTOP ‘SAVE BIN CHAR IN PTOP. 
MOV PTIP, “1 BIN CHAR TO RI. 
. xX . 


RTS % : 
;OCTAL TO ASCII CONVERT ROUTINE 
OACNV: MOV @(5)+,OACNVX ;GET OCTAL VALUE. 


MOV (5)+,21 3GET Abs oll ra 
MOV (5)+,%2 :GET CONVERT COUN 
ADD 12,24 ;DEVELOP ADDR TO STORE 1ST CHAR. 
* OACNVA: MOV OACNVX ,%3 
BIC #177770,23 ISOLATE LEAST SIGNIFICANT DIGIT. 
ADD #60,%3 CONVERT DIGIT TO ASCII. 
MOVB 43,-(1) ;STORE ASCII CHARACTER. 


000022 


BIC #7 ,OACNVX 


DEC %2 ;DONE ALL DIGITS? 
BNE OACNVA ;BRANCH IF NOT DONE. 
ase x5 ;DONE. EXIT. 

OACNVX: OPEN 

; SUBROUTINE TO MOVE A VARIABLE ety OF BYTES. 

BMOVE: SAVREG AVE REGS. 
MOV (5)+,%1 :GET''FROM' ADDRESS 
MOV (5)+,%2 :GET''TO' ADDRESS 


MOV (5)+,%3 :GET COUNT 
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1103 003372 112122 BMOVA: MOVB  (1)+,(2)+ :MOVE BYTE 
1104 003374 005303 DEC %z ‘DECREMENT COUNT 
1105 003376 001375 BNE BMOVA “BRANCH IF NOT DONE. 
1106 003400 104014 RSTREG *RESTORE REGS. 
1107 003402 000205 RTS 15 ‘DONE EXIT 
1108 :BINARY TO DECIMAL ASCII CONVERT SUBROUTINE. 
1109 003404 012700 003524 BDCNV: MOV #DECVAL, XO :SET UP ADDR TO STORE DECIMAL ASCII IN RO 
1110 003410 013501 MOV a(5)+,%4 ‘BINARY VALUE TO R1. 
1111 003412 012702 003512 MOV #ADTENP, %2 ‘ADDR OF TEN POWER STRING TO R2. 
1112 003416 012767 000005 000060 MOV #5,CNVCTR “SET UP FOR 5 POWER CONVERSIONS. 
1113 003424 012267 000060 BDCNVA: MOV (25+, TENPWR ‘MOVE POWER OF TEN VALUE TO TENPWR. 
1114 003430 004767 000010 JSR %7, SUBTEN ‘PERFORM CONVERSION 
1115 003434 005367 000044 DEC CNVCTR [DONE 5 CONVERSIONS? 
1116 003440 001371 BNE BDCNVA ‘BRANCH IF NOT YET 5. 
1117 003442 000205 RTS 15 YES, EXIT. 
1118 003444 005067 000036 SUBTEN: CLR DIGIT “CLEAR DIGIT 
1119 003450 166701 000034 SUBTNA: SUB TENPWR,%1 “SUBTRACT TEN POWER FROM BINARY VALUE. 
1120 003454 103403 BCS SUBTNB “BRANCH IF UNSUCCESSFUL SUBTRACTION. 
1121 003456 005267 000024 INC DIGIT 
1122 003462 000772 BR SUBTNA 
1123 003464 066701 000020 SUBTNB: ADD TENPWR,%1 sRESTORE SUBTRACTED VALUE. 
1S 003470 062767 000060 000010 ADD #60,DIGIT sCONVERT (DIGIT) TO ASCII 
1125 003476 116720 000004 MOVB  DIGIT,(0)+ “MOVE ASCII CHAR TO DECVAL FIELD. 
1126 003502 000207 RTS 17 ‘EXIT. 
1127 003504 000000 CNVCTR: OPEN 
1128 003506 000000 DIGIT: OPEN 
1129 003510 000000 TENPWR: OPEN 
1130 003512 023420 ADTENP: 10000. 
1131 003514 001750 1000. 
1132 003516 000144 100 
1133 003520 000012 10 
1134 003522 000001 1 
1135 003524 040 040 040 DECVAL: .BYTE  040,040,040,040,040,040 
1136 003527 040 040 040 
1137 003532 012567 175530 DATTST: MOV (5)+,SRT ;GET PARAMETERS 
1138 003536 004767 011230 JSR 7, STPARB :LOAD PARAMETERS 
1139 003542 042777 000001 175330 BIC #BITO,@RXCSR CLEAR DATA TERM. READY 
1140 003550 052777 000004 175326 IS #BIT2.aTXCSR | :SET MAINTENANCE BIT 
1141 003556 012767 000144 175462 MOV #100. ,CTRA [GET CHARACTER COUNT 
1142 003564 105777 175314 DATAA: TSTB  atTXCSR ‘WAIT FOR 
1143 003570 100375 BPL a4 “READY FLAG 
1144 003572 004767 177434 JSR 7,GTBINP ‘GET CHARACTER 
1145 003576 110167 175430 MOVB X14, CRBUFA “MOVE CHARACTER 
1146 003602 046767 175426 175422 BIC CARMSK,CRBUFA :MASK OFF NON TRANSMITTED BITS 
1147 003610 110177 175272 MOVB  -%&1,aTXBUF ‘TRANSMIT CHARACTER 
1148 003614 105777 175260 TSTB = @RXCSR ‘WAIT FOR 
1149 003620 100375 BPL oh “DONE FLAG 
1150 003622 117767 175254 175400 MOVB  aRXBUF,CRBUF § :GET RECEIVED CHARACTER 
1151 003630 104004 DATCHK =CHK DATA 
1152 003632 005367 175410 DEC CTRA ‘DECREMENT CHARACTER COUNT 
1153 003636 001352 BNE DATAA 
1154 003640 005726 TST (6)+ :POP STACK 
1135 003642 104012 SCOPE 
1157 003644 012767 003654 174152 PFAIL: MOV #PWRUP, 24 
1158 003652 000000 HALT 
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1160 003654 000005 PWRUP: RESET 
1161 003656 004767 176262 JSR PC ,DCACHE ;DISABLE CACHE. ;;++C 
1162 003662 012706 001076 MOV #SPBOT ,%6 
1163 003666 104003 ERROR 
1164 003670 016700 175244 RESTART: MOV PRGNUM,%0 ;GET PROGRAM NUMBER 
1165 003674 006300 ASL x0 
1166 003676 012767 003644 174120 MOV #PFAIL,24 ;RELOAD POWER FAIL VECTOR 
1167 003704 004767 011062 JSR 7,STPARB ;RELOAD LINE PARAMETERS 
es | 003710 000170 003714 JMP @RSTART(O) 3GO RESTART SELECTED PROGRAM 
1170 003714 003752 PSTART: PRGOA ;PROGRAM 0 RESTART ADDRESS 
1171 003716 . 014444 PRGIA ;PROGRAM 1 RESTART ADDRESS 
1172 003720 014510 PRG2A ;PROGRAM 2 RESTART ADDRESS 
1173 003722 014604 PRG3A ;PROGRAM 3 RESTART ADDRESS 
ee 003724 014640 PRGGA ;PROGRAM 4 RESTART ADDRESS 
1176 PRGO - INPUT-OUTPUT LOGIC TESTS 
1177 003726 012767 003756 175206 PRGO: MOV WATO,KSTART 
1178 003734 104000 TYPE ;TYPE TITLE AND INSTRUCTIONS 
1179 003736 015311 POTIT 
1180 003740 000000 HALT 
1181 003742 004567 177034 JSR 5,LINSEL 3GO GET LINE # FROM USER 
1182 003746 006767 175320 JSR 7,SETSR 
1183 003752 000167 175670 PRGOA: JMP GETRDY 3;GET STARTED. 
113° 177777 TX=-1 
1186 "<i adie hgh it i= at alata 
1187 003756 000000 ATO: 0 ; TEST NUMBER 0 * 
1188 003760 004010 AT1 S ADDRESS OF NEXT TEST . 
1189 003762 001750 1000. ;TEST ITERATION COUNT * 
1190 003764 003766 AAA ‘SCOPE ENTRY POINT * 
1191 PRRRARERA AAA A ATTA AAA TA AAA TARA AAAAAAAAAAAAAAREK EAA eK Kee et Keee eee 
1192 ;TEST ABILITY TO REFERENCE RECEIVER CSR WITHOUT TRAPPING 
1193 003766 012767 004002 174010 AAA: MOV #AAE ,MACHER ;SET UP MACHINE ERROR TRAP. 
1194 003774 005777 175100 TST @RXCSR sREFERENCE RXCSR 
1195 004000 104012 AAB: SCOPE ;0K IF NO TRAP. SCOPE 
1196 004002 022626 AAE: POPSP2 
1197 104003 ERROR ; TRAPPED WHEN REFERENCING RXCSR. 
1198 004006 000774 BR AAB 
1199 RRR Ree RRA AAA AA AAA TATA AAA AA AAA AAA AAAAAAAAAAAAA AAA AAA e eee eee eee 
1200 004010 000001 AT1: 1 : TEST NUMBER 1 * 
1201 004012 004042 AT2 ;ADDRESS OF NEXT TEST * 
1202 004014 001750 1000. TEST ITERATION COUNT * 
1203 004016 004020 ABA :SCOPE ENTRY POINT * 
1204 PITTITITTLITIIL TILL T TTL LTT tii ihiit it iti titi 
1205 :TEST ABILITY TO REFERENCE RECEIVER BUFFER WITHOUT TRAPPING 
1206 004020 012767 004034 173756 ABA: MOV #ABE ,MACHER ;SET UP MACHINE ERROR TRAP. 
1207 004026 005777 175050 TST @RXBUF REFERENCE RXBUF 
1208 004032 104012 ABB: SCOPE > 0K IF NO TRAP SCOPE 
1209 004034 022626 ABE : POPSP2 
1210 004036 104003 ERROR ; TRAPPED WHEN REFERENCING RXBUF 
1st) 004040 000774 BR ABB 
1213 CRRA AREA AAA AEA A ARATE AAA AAA AAAAAAARAAAAAAAKRAKA RAR EREReK eet 
1214 004042 000002 AT2: 2 ; TEST NUMBER 2 * 
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1215 004044 604074 AT3 sADDRESS OF NEXT TEST . 
1216 004046 001750 1000. *TEST ITERATION COUNT a 
1217 004050 004052 ACA :SCOPE ENTRY POINT . 
1218 000000 TX=TX+1 
1219 SRR AAA EERE AERA EEEEREEAAAEAAAAAAAAARAERAARARARAR AKA RARK AA KE 
1220 ;TEST ABILITY TO REFERENCE TRANSMITTER CSR WITHOUT TRAPPING. 

1221 004052 012767 004066 173724 ACA MOV WACE MACHER :SET UP MACHINE ERROR TRAP. 

1222 004060 005777 175020 TST aTXCSR REFERENCE TXCSR 

1223 104012 ACB: SCOPE SCOP E 

1224 004066 022626 ACE: POPSP2 

1225 004070 104003 ERROR ; TRAPPED WHEN REFERENCING TXCSR 

1206 004072 000774 BR ACB 

1228 a. kL. ale Stee mee ES dake Sian 

1229 004074 000003 AT3: 3 ;TEST NUMBER 3 + 
1230 004076 004126 ATS ‘ADDRESS OF NEXT TEST * 
1231 0041 001750 1000. :TEST ITERATION COUNT = 
1232 004102 004104 ADA :SCOPE ENTRY POINT * 
1233 PITTITITT ITIL ITT ITT T TTT ITT ITTitt i tiiiiiitiiitiiiti titi iii t irri 

1234 :TEST ABILITY TO REFERENCE TRANSMITTER BUFFER WITHOUT TRAPPING 

1235 004104 012767 004120 173672 ADA: MOV WADE , MACHER :SET UP MACHINE ERROR TRAP. 

1236 004112 005777 174770 TST aTXBUF sREFERENCE TX BUF. 

1237 004116 104012 ADB SCOPE : SCOPE 

1238 004120 022626 ADE POPSP2 

1239 004122 104003 ERROR : TRAPPED WHEN REFERENCING TXBUF 

1240 004124 000774 BR ADB 

124 ee ee eee Gee Be ee ae ee | 

1243 004126 000004 ATA: 4 :TEST NUMBER 4 . 
1244 004130 004226 ATS SADDRESS OF NEXT TEST * 
1245 004132 000144 100. ‘TEST ITERATION COUNT * 
1246 004134 004136 AEA :SCOPE ENTRY POINT 5 
1247 FRAC ARA ERE AA TARA AAA TA ATER AAA AAE AAA AAA ARERR EAHA AAAAAEAAAAARAA ERAT 

1248 [TEST THAT TXCSR BITO CAN BE SET, CLEARED, AND THAT RESET CLEARS IT. 

1249 004136 032777 000001 174740 AEA: BIT #BITO,aTXCSR :SEE IF TXCSR BITO IS CLEAR. 

1250 004144 001402 BEQ AEB ‘BRANCH IF BIT IS CLEAR. 

1251 004146 104003 ERROR sRESET DID NOT CLEAR TXCSR BITO 

1252 004150 000421 BR AED 

1253 004152 052777 000001 174724 AEB: BIS #B1TO,aTXCSR :SET TXCSR BITO. 

1254 004160 032777 000001 174716 BIT #BITO,aTXCSR :SEE IF BIT al’ SET. 

1255 004166 001002 BNE AEC ‘BRANCH IF BIT IS SET 

1256 004170 104003 ERROR sTXCSR Biro” EAILED TO SET. 

1257 004172 000410 BR AED 

1258 004174 042777 000001 174702 AEC: BIC #BITO,aTXCSR :CLEAR TXCSR BITO 

1259 O04308 032777 000001 174674 BIT #BITO,aTXCSR sSEE IF BIT IS CLEAR. 

1260 004210 001401 EQ AED 

1261 O0et¢ 104003 ERROR sTXCSR BITO FAILED TO CLEAR. 

1268 004214 052777 000001 174662 AED: BIS #BITO,aTXCSR *SET TXCSR BITO. 

1263 004222 104011 SRESET ;ISSUE RESET TO CLEAR BIT. 

1264 004224 104012 SCOPE COPE 

1265 s deeeceseceeeceececeecereeereceetecenaeenenqneqeceneeceeesereeqeeneenes 

1266 004226 000005 ATS: 5 ;TEST NUMBER 5 * 
1267 004230 004324 AT6 SADDRESS OF NEXT TEST “ 
1268 004232 000144 100. :TEST ITERATION COUNT 8 
1269 004234 004236 “SCOPE ENTRY POINT 4 
1270 FUMAAAAAAAAAAA AAA ALA AA AAA TA ATTA AAA Ke Kee Kee ee Katee eKeteeKeKeteereteres 
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1271 TEST THAT TXCSR BIT1 (CLEAR TO SEND) CAN BE SET, AND CLEARED 
1272 004236 042777 000001 174634 : BIC #B1TO,aRXCSR 3;CLEAR DATA TERMINAL READY 
1273 004244 032777 000002 174632 BIT #B171,aTXCSR +SEE IF TXCSR BIT1 IS CLEAR. 
1274 004252 001402 Q AFB BRANCH IF BIT IS CLEAR. 
1275 004254 104003 ERROR TXCSR BIT1 IS NOT CLEAR. 
1276 004256 000421 BR AFD sEXIT TEST 
1277 004260 052777 000001 174612 AFB: BIS #B1TO,aRXCSR 3SET DATA TERM. > ts or CTS VIA JUMPER) 
1278 004266 032777 000002 174610 BIT #BIT1,aTXCSR ;1S CLEAR TO SEND S$ 
1279 004274 001002 AFC ‘BRAN CH IF SET 
1280 004276 104003 ERROR 3CTS NOT BEING SET VIA DIR 
1281 004300 000410 BR AFD TEXIT TEST 
1282 004302 042777 000001 174570 FC: BIC #B1TO,aRXCSR CLEAR DATA TERM. RDY. 
1283 004310 032777 000002 174566 BIT #BIT1,aTXCSR 318 CTS CLEAR? 
1284 004316 001401 BEQ AFD 
1285 004320 104003 ERROR ;CTS FAILED TO CLEAR VIA DTR 
ie 004322 104012 AFD: SCOPE SCOPE 
1288 5 RERARAAAAAAERAARARERAEEEAAAAAAAATERAEAAAARARARAAAAAAAREAAAAAAAAAAAAAKAKRAAREKEEE 
1289 004324 000006 ATé6: 6 ; TEST NUMBER 6 * 
1290 004326 004424 AT? SADDRESS OF NEXT TEST * 
1291 004330 000144 100. ;TEST ITERATION COUNT * 
1292 004332 004334 AGA SCOPE ENTRY POINT * 
1293 PRRRAAEAAAAAAA AAA TATA AAT TATA TARA AA AATAAA RETAKE KAKA TAKeAeeeeeKeKeeeeeet 
1294 ;TEST THAT TXCSR BIT2 CAN BE SET, CLEARED, AND THAT RESET CLEARS IT. 
1295 004334 032777 000004 174542 AGA BIT #B1T2,aTXCSR ;SEE IF TXCSR a IS vem 
1296 004342 001402 BEQ AGB BRANCH IF BIT IS CLEAR 
1297 004344 104003 ERROR ;RESET DID NOT CLEAR TXCSR BIT2 
1298 eek te So0se BR AGD 
1299 004350 052777 000004 174526 AGB: BIS #B1T2,aTXCSR sSET TXCSR BIT2. 
1300 004356 032777 000004 174520 BIT #BIT2,aTXCSR :SEE IF BIT IS SET. 
1301 004364 001002 N AGC BRANCH IF BIT IS SET. 
1302 004366 104003 ERROR sTXCSR BIT2 FAILED TO SET. 
1303 004370 000410 AGD 
1304 004572 042777 000004 174504 AGC: BIC #BIT2,aTXCSR sCLEAR TXCSR BIT2 
1305 004400 032777 000004 174476 BIT #BIT2,aTXCSR 3SEE IF BIT IS CLEAR. 
1306 004406 001401 BEQ AGD 
1307 004410 104003 ERROR sTXCSR BIT2 FAILED TO CLEAR. 
1308 004412 052777 000004 174464 AGD: BIS #BIT2,aTXCSR SET TXCSR BIT 
1309 004420 104011 SRESET ; ISSUE RESET TO CLEAR BIT. 
1310 004422 104012 SCOPE SCOPE 
1311 FRMAAARR Ree AK eAKAAARATAA AAA TAKA AHA AKAAAAAAeeKeKeKeKeeKKeeeeeeeKeteAee es 
1312 004424 000007 AT7: 7 ;TEST NUMBER 7 * 
1313 004426 004524 AT10 sADDRESS OF NEXT TEST * 
1314 004430 000144 100. ;TEST ITERATION COUNT “ 
1315 004432 004434 AHA ;SCOPE ENTRY POIN( * 
1316 seeeeeeeeeeedereeeereeeeeereeeereeeeeeeeereneKererenerteeteererteeereees 
1317 TEST THAT TXCSR BITS CAN BE SET, CLEARED, AND THAT RESET —— IT. 
1318 434 032777 000010 174442 AHA: BIT #BITS,aTXCSR SEE IF TXCSR BITS IS us AR 
1319 004442 001402 BEQ AHB BRANCH IF BIT IS CLEAR 
1320 004444 104003 ERROR RESET DID NOT CLEAR TXCSR BIT3 
1321 004446 gett BR 
136 004450 Bast 7 000010 174426 AHB: BIS Ps BIT 3,aTXCSR SET TXCSR BITS. 
1823 004456 032777 000010 174420 BIT #B iM 3,aTXcSR ;SEE IF BIT i SET. 
1324 004464 001002 BNE AHC BRANCH IF BIT IS SET. 
1325 0044 104003 ERROR 3; TXCSR BIT3" FAILED TO SET. 
1326 004470 000410 BR AHD 





-MAIN. MACY11 nl — 10:55 PAGE 26 


CZDCAD.P11 10=JUN-80 10:47 SEQ 0025 
1327 004472 042777 000010 174404 AHC: BIC #BIT3,aTXCSR ;CLEAR TXCSR BITS 
1328 004500 032777 000010 174376 BIT #BITS,aTXCSR ;SEE IF BIT IS CLEAR 
1329 004506 001401 BEQ AHD 
13 004510 104003 ERROR sTXCSR BITS FAILED TO CLEAR. 
1331 004512 052777 000010 174364 AHD: BIS #BIT3,aTXCSR sSET TXCSR BITS. 
1332 004520 104011 SRESET ISSUE RESET TO CLEAR BIT. 
1333 004522 104012 SCOPE ; SCOPE 
1335 
1336 SORA RAEAAAEREAAAA AEA A EEE AAA EEE AEREAAAAAAAAAAEEAARAREAAEAAREAARAEEE ETA EES 
1337 004524 000010 AT10: 10 s TEST NUMBER 10 * 
1338 004526 004624 AT11 TADDRESS OF NEXT TEST * 
1339 004530 000144 100. ;TEST ITERATION COUNT * 
1340 004532 004534 AIA ;SCOPE ENTRY POINT * 
1341 FREER AAAREAEAAEE AERA AE AEAAAEAAAAAAEARERAREAAAEEAAREREAARAAAREARRNEE 
1342 :TEST THAT TXCSR BIT4 CAN BE SET, ee AND THAT RESET — IT. 
1343 004534 032777 000020 174342 AIA: BIT #BIT4,aTXCSR SEE IF TXCSR BIT4 IS CLEAR 
1344 004542 001402 BEQ AIB sBRANCH IF BIT IS CLEAR. 
1345 004544 104003 ERROR RESET DID NOT CLEAR TXCSR BIT4 
1346 004546 000421 BR AID 
1347 004550 052777 000020 174326 AIB: BIS #B1T4,aTXCSR sSET TXCSR BIT4. 
1348 004556 032777 000020 174320 BIT #B1T4,aTXCSR SEE IF BIT IS SET. 
1349 004564 001002 BNE AIC ;BRANCH IF BIT IS SET 
1350 004566 104003 ERROR :TXCSR BIT4 FAILED TO SET. 
1351 004570 000410 BR AID 
1352 004572 042777 000020 174304 AIC: BIC #B1T4 ,aTXCSR sCLEAR TXCSR BITS 
1353 004600 032777 000020 174276 BIT #B1T4,aTXCSR sSEE IF BIT IS CLEAR. 
1354 800608 001401 BEQ AID 
1355 610 104003 ERROR sTXCSR BIT4 FAILED TO CLEAR. 
1356 004612 052777 000020 174264 AID: BIS #B1T4,aTXCSR SET TXCSR BITS. 
1357 004620 104011 tf ISSUE RESET TO CLEAR BIT. 
1358 004622 104012 ; SCOPE 
1359 Jdenmemnaecontinenimmnnemanneibes teterrenrensemmmineeerneemntin 
1360 004624 000011 AT11: 11 ;TEST NUMBER 11 * 
1361 004626 004732 AT12 :ADDRESS OF NEXT TEST * 
1362 004630 000144 100. ;TEST ITERATION COUNT * 
1363 004632 004634 AJA :SCOPE ENTRY POINT * 
1364 WITTTITI ITI ITIITI TIT TiTtitiitiitiitiitiiiiiiiiiiiiistit titi 
1365 :TEST THAT TXCSR BIT6 CAN BE SET, CLEARED, AND THAT RESET CLEARS IT. 
1366 006634 012767 000340 173134 AJA: MOV #PRTIY7,PSW sSET PRIORITY 7. 
1367 004642 032777 000100 174234 BIT . #B1T6, aTXCSR :SEE IF TXCSR BITS IS CLEAR. 
1368 004650 001402 BEQ § AJB ;BRANCH IF BIT IS CLEAR. 
1369 004652 104005 ERROR RESET DID NOT CLEAR TXCSR BIT6 
1370 004654 000421 BR A 
1371 004656 Seer 000100 174220 AJB: BIS. #B1T6,aTXCSR sSET TXCSR BIT6. 
137¢ 032777 000100 174212 BIT #B1T6,aTXCSR sSEE IF BIT IS SET. 
13 004672 001002 BNE AJC ;BRANCH IF BIT IS SET. 
1374 004674 104003 ERROR ;TXCSR BIT6 FAILED TO SET. 
1375 76 000410 BR AJD 
1378 00 oag Te 000100 174176 AJC: BIC #B1T6,aTXCSR :CLEAR TXCSR BIT6 
1377 004706 032777 000100 174170 BIT #B1T6,aTXCSR ;SEE IF BIT IS CLEAR. 
1378 Boe 1 He BEQ 
1379 re 104003 ERROR bi BIT6 FAILED TO CLEAR. 
1380 0047 052777 000100 174156 AJD: BIS #B1T6,aTXCSR :SET TXCSR BIT 
1381 004726 104011 SRESET :ISSUE RESET TO CLEAR BIT. 
1382 0047 104012 SCOPE 3; SCOPE 
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a ess 


;THAT IT CAN BE READ RELIABLY. 


PKA: TSTB aTXCSR :SEE IF TXCSR BIT 7 IS SET. 
BMI AKB ;BRANCH IF SET. 
ERROR sTXCSR BIT 7 NOT SET. 

AKB: SCOPE ; SCOPE 


PITTI ital t tii tii tii titi iiiiiiiiiiiiiitiviviiiiiiiiii rir reer esr eres 
AT13: 13 sTEST NUMBER 13 
AT14 ADDRESS OF NEXT TEST 
100. ;TEST ITERATION COUNT 
ALA ;SCOPE ENTRY POINT 
OTT I Ii it itt ii iii iii iiiiiriiiiitiiitiiiiiitiii iii rrr errr rey 
:TEST THAT TXCSR BITS CAN BE SET, CLEARED, AND THAT wif nee IT. 
ALA: BIT #B1T8,aTXCSR [SEE IF TXCSR BITS io 


a ese 


BEQ ALB ;BRANCH IF BIT IS CLEAR 
— oT sRESET DID NOT CLEAR TXCSR BITS 
ALB: BIS #B1T8,aTXCSR ;SET TXCSR BITS. 
BIT #B1T8,aTXCSR SEE IF i's 
BNE ALC :BRANCH IF BIT IS SET. 
— ne ; TXCSR Bits” FAILED TO SET. 
ALC: BIC #B1T8,aTXCSR CLEAR TXCSR BITS 
BIT #B1T8,aTXCSR ;SEE IF BIT IS CLEAR. 
BEQ ALD 
ERROR : TXCSR i + ‘a TO CLEAR. 
ALD: BIS #B1T8,aTXCsR :SET TXCSR BITS. 
SRESET ; ISSUE RESET. TO CLEAR BIT. 
SCOPE ; SCOPE 
ee ee enn eae eemeee OE ee ete ee eee 
AT14: 14 ;TEST NUMBER 14 ® 
AT15 TADDRESS OF NEXT TEST * 
100. | TEST ITERATION COUNT ® 
:SCOPE ENTRY POINT * 


ape gpaen yg senor. yy npr oy negra prem none rem ta a e 
Test te say BITS IS CLEAR AND CAN BE READ REL 


SEQ 0026 
OSS I iii iiiiiiiiiiiiiiiiiiiiiiiiii iii 
AT12: \¢ ; TEST NUMBER 12 
113 TADDRESS OF NEXT TEST 
100. :TEST ITERATION COUNT 
AKA SSCOPE ENTRY POINT 
TTI IIIT ITI Ti iti iii titi iii iitiiiti ili iiitiii iii iii ir 
TEST THAT TXCSR BIT 7 (READY BIT) IS SET UPON ENTERING ROUTINE AND 
@BITIS,@TXCSR ;SEE IF TXCSR BITS ts CLEAR. 


BEQ VT 7BRANCH IF BIT IS CLEAR. 
ERROR :THCSR BITI5 IS NOT CLEAR. 
AMB: SCOPE ; SCOPE 
“> pemeaa *petnetnce eent aca andi tegatana tae + ates aa nt ih a incited it | 
ATIS: 15 TEST NUMBER 15 , 
ATI6 [ADDRESS OF NEXT TEST : 
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1439 005104 000144 100. ;TEST ITERATION COUNT ° 
1440 005106 005110 ANA :SCOPE ENTRY POINT * 
1441 PITIIITIT TTI TITI TILT TI LITT ii Titi tit iti iti titi iii 
1442 TEST THAT RXCSR BIT 0 (DATA TERMINAL READY) CAN BE SET, NOT CLEARED BY RESET, AND CLEAR 
1443 005110 052777 000001 173762 BIS #BITO,ARXCSR ;SET RXCSR BIT 6. 

1444 005116 032777 000001 173754 BI) #BITO,aRXCSR SEE IF BIT IS SET. 

1445 005124 001002 BNE ANB ‘BRANCH IF BIT IS SET. 

1446 005126 104003 ERROR 

1447 005130 000417 BR AND 

1448 005132 104011 ANB: SRESET : ISSUE RESET. 

1449 005134 032777 000001 173736 BIT #B1TO,aRXCSR ;SEE IF BIT 7 STILL SET. 

1450 005142 001002 BNE ANC ‘BRANCH IF BIT SET 

1451 005144 104003 ERROR ;RESET CLEARED RXCSR BIT 0. 

1452 005146 000410 BR AND 

1453 005150 042777 000001 173722 ANC: BIC #BI1TO,aRXCSR :CLEAR RXCSR BIT O. 

1454 005156 032777 000001 173714 BIT #BITO,aRXCSR : SEE IF BIT IS CLEAR. 

1455 005164 001401 BEQ AND ;BRANCH IF BIT IS CLEAR 

1456 005166 194003 ERROR sRXCSR BIT O FAILED TO CLEAR. 
1457 005170 104012 AND: SCOPE > SCOPE 

1458 RRA REE AERA RATER TAA AAA AAAAAAAAAAAAR ARE KKeAKe Ae eekeeee tee res 
1459 005172 000016 AT16: 16 ; TEST NUMBER 16 

1460 005174 005272 AT17 ;ADDRESS OF NEXT TEST 

1461 005176 000144 100. :TEST ITERATION COUNT 

1462 005200 005202 ANW ;SCOPE ENTRY POINT 

1463 RRR E REAR R ERA EAA EEA RE ARERR ERRATA AARARAAAAA ARATE 
age :TEST THAT RXCSR BIT 1 CAN BE SET, CLEARED, AND THAT RESET CLEARS IT 
1466 005202 032777 000002 173670 ANW: BIT #B1T1,aRXCSR ;SEE IF BIT 1 IS CLEAR 

1467 005210 001402 BEQ ANX :BRANCH IF CLEAR 

1468 005212 104003 ERROR sRESET DID NOT CLEAR RXCSR BIT 1 
1469 005214 000421 BR ANZ 

1470 005216 052777 000002 173654 ANKX: BIS #BIT1,ARXCSR ;SET RXCSR BITI 

1471 005224 032777 000002 173646 BIT #BIT1,@RXCSR ;SEE IF BIT IS SET 

1472 005232 001002 BNE ANY ;BRANCH IF SET 

1473 005234 104003 ERROR ;RXCSR BIT 1 FAILED TO SET 

1474 005236 000410 BR ANZ 

1475 005240 042777 000002 173632 ANY: BIC #BiTl,aRXCSR ;CLEAR RXCSR BIT 1 

1476 005246 032777 000002 173624 BIT #BIT1,@RXCSR ;SEE IF BIT IS CLEAR 

1477 005254 001401 BEQ ANZ 

1478 005256 104003 ERROR sRXCSR BIT 1 FAILED TO CLEAR 
1479 005260 052777 000002 173612 ANZ: BIS #BIT1,aRXCSR . ;SET RXCSR BIT 1 

1480 005266 104011 SRESET ; ISSUE RESET TO CLEAR BIT 

Hee 005270 104012 SCOPE SCOP E 

1483 RRR RATER AEE RARER AAA AAA AREA AAAAAAAAAARAAAARERE RATE 
1484 005272 000017 AT17: 17 ; TEST NUMBER 17 * 
1485 005274 005316 AT20 TADDRESS OF NEXT TEST * 
1486 005276 000144 100. TEST ITERATION COUNT * 
1487 005300 005302 APA ;SCOPE ENTRY POINT * 
1488 seeeeeeeeeeeeeeeeeteeeetereeeeneeeereeeeerereeererteerteterereteteretere 
1489 TEST THAT RXCSR BIT2 IS CLEAR AND CAN BE READ RELIABLY. 

1490 005302 032777 000004 173570 APA: BIT #B1T2,aRXCSR SEE IF RXCSR BIT2 IS CLEAR. 

1491 005310 001401 BEQ APB “BR ANCH IF BIT IS CLEAR. 

1492 005312 104003 ERROR sRXCSR BIT2 IS NOT CLEAR. 

1493 005314 104012 APB: SCOPE SCOPE 


1494 Set eeeeeeeeeneeeeeeeeeeeeenerereetenteneretereretetererreeeeereneeeeees 


eee aoe Se ensstenesesstesssensseitiseemieeisneeeeem —— 
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1495 005216 000020 AT20: 20 ; TEST NUMBER 20 ¥ 
1496 005320 605416 AT21 s;ADDRESS OF NEXT TEST * 
1497 005322 000144 100. ; TEST ITERATION COUNT * 
1498 005324 005326 AQA ;SCOPE ENTRY POINT * 
1499 . OT ITIIIIIIIITIIISITIIILIETIIILILITETI TITEL TTi TTT Ti TitiTiiiTitiTritittT 
1500 TEST THAT RXCSR BIT3 CAN SET, CLEARED, AND THAT og _— ST. 
1501 005326 032777 000010 173544 BIT ty 3,aRXCSR ;SEE IF RXCSR BITS IS _— 
1502 005334 001402 BEQ AQB BRANCH IF BIT IS CLEAR 
1503 005336 104003 ERROR RESET DID NOT CLEAR RXCSR BIT3 
1504 005340 000421 B AQD 
1505 005342 052777 000010 173530 Ads: BIS #BIT3,aRXCSR :SET RXCSR BITS. 
1506 005380 032777 000010 173522 BIT #BIT3,aRXCSR ;SEE IF BIT IS SET. 
1507 005356 001002 BNE AQc BRANCH IF BIT IS SET. 
- 1508 005360 104003 ERROR :RXCSR BIT3 FAILED TO SET. 
1509 005362 000410 BR AQD 
1510 005364 042777 000010 173506 Adac: BIC #B1T3,aRXCSR ;CLEAR RXCSR BIT3 
1511 005372 032777 000010 173500 BIT #BIT3,aRXCSR ;SEE IF BIT IS CLEAR. 
1512 005400 001401 BEQ AQD 
1513 005402 104003 ERROR sRXCSR BITS FAILED TO CLEAR. 
1514 5404 052777 000010 173466 AdQD: BIS #BIT3,aRXCSR ;SET RXCSR BITS. 
1515 005412 104011 SRESET ; ISSUE RESET TO CLEAR BIT. 
1516 005414 104012 SCOPE $C PE 
1517 TTIIIITITITIIIIILILITILITITILITITTTITTLTTiLiTiiiiiiiriiiiiiiiititiiii 
1518 005416 000021 AT21: 21 ; TEST NUMBER 21 * 
1519 005420 005516 AT22 S ADDRESS OF NEXT TEST * 
1520 005422 000144 100. ;TEST ITERATION COUNT * 
1521 005424 005426 ARA ;SCOPE ENTRY POINT * 
1386 FRR AERA ERATE AEA EEE EAA AAA ARERR TAREE 
15 iTEST THAT RXCSR atte. a BE SET, CLEARED, AND THAT RESET eae: iT. 
1524 005426 032777 000020 173444 ARA BIT Ng RXCSR SEE IF RXCSR BIT4 IS _ 
1525 005434 001402 BEQ ARB ‘BRANCH IF BIT IS CLEAR 
1526 005436 104003 ERROR RESET DID NOT CLEAR RXCSR BIT4 
1527 005440 000421 BR ARD 
1528 005442 052777 000020 173430 ARB: BIS #BIT4,aRXCSR :SET RXCSR BITS. 
1529 005450 032777 000020 173422 BIT #B1T4,aRXCSR ;SEE IF BIT IS SET. 
1530 005456 001002 BNE ARC : BRANCH IF BIT IS SET 
1531 005460 104003 ERROR sRXCSR BIT4 FAILED TO” SET. 
1532 005462 000410 BR ARD 
1533 005464 042777 000020 173406 ARC: BIC #BIT4,aRXCSR ;CLEAR RXCSR BITS 
1534 005472 032777 000020 173400 BIT #B1T4,aRXCSR ;SEE IF BIT IS CLEAR. 
1535 005500 001401 BEQ ARD 
1536 005502 104003 ERROR sRXCSR BITS wee TO CLEAR. 
1537 005504 052777 000020 173366 ARD: BIS #BIT4,aRXCSR :SET RXCSR BIT4 
1538 005512 104011 SRESET : ISSUE RESET TO” CLEAR BIT. 
4 005514 104012 SCOPE SCOP E 
1541 Sale de te a cee Genes EE ee 
13t¢ 005516 000022 AT22: 22 ;TE3T R 22 
1543 005520 005542 AT23 ADDRESS. 0 oF NEXT TEST 
1544 005522 000144 100. 3; TEST ITERATION COUNT 
1545 005524 005526 ARBA SCOPE ENTRY POINT 
1546 PRCA RAAR HAHAHAHAHA AEH AAA ARETE RARE AERA AAAARAREREHEKEAE KAKA AERA 
1547 ;TEST THAT PARITY INDICATOR (BITS RXCSR) IS CLEAR 
1308 ;AND CAN BE READ RELIABLY. 
1550 005526 032777 000040 173344 ARBA: BIT #BITS,A@RXCSR ;SEE IF PARITY INDICATOR IS CLEAR 
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1551 005534 001401 BEQ ARBB ;BRANCH IF CLEAR 

122¢ 005536 104003 ERROR 31S NOT CLEAR 

1337 005540 104012 ARBB: SCOPE ; SCOPE 

1555 PRRRAAAARAARAAAAAEA HATA TAA AAAAAEKE KAA K AeA eeAeeeeA Ket Atte eeeeeeeereeeene 
1556 005542 000023 AT23: 23 ;TEST NUMBER 23 . 
1557 005544 005650 AT24 SADDRESS OF NEXT TEST * 
1558 005546 000144 100. :TEST ITERATION COUNT ‘ 
1559 005550 005552 ASA ;SCOPE ENTRY POINT « 
1560 PORARARERARERAATERAAA AEA A ETAT ATARA AHHH AE AK ATT KAKA AAA Ke AK ete eee t eset 
1561 ;TEST THAT RXCSR BIT6 CAN BE SET, CLEARED, AND_THAT RESET CLEARS IT. 

1562 005552 012767 000340 172216 FSA: MOV #PRTY7,PSW ;SET PRIORITY 7. 

1563 005560 032777 000100 173312 BIT #B1T6,aRXCSR ;SEE IF RXCSR BIT6 IS CLEAR. 

1564 5 001402 BEQ ASB ;BRANCH IF BIT IS CLEAR. 

1565 005570 104003 ERROR RESET DID NOT CLEAR RXCSR BIT6 

1566 005572 000421 BR ASD 

1567 005574 052777 000100 173276 ASB: BIS #BIT6,aRXCSR ;SET RXCSR BITS. 

1568 005602 032777 000100 173270 BIT #B1T6,adRXCSR ;SEE IF BIT IS SET. 

1569 005610 001002 BNE ASC ;BRANCH IF BIT IS SET. 

1570 005612 104003 ERROR ;RXCSR BIT6 FAILED TO SET. 

1571 005614 000410 BR ASD 

1572 005616 042777 000100 173254 ASC: BIC #BIT6,aRXCSR ;CLEAR RXCSR BIT6 

1573 005624 032777 000100 173246 BIT #B1T6,a@RXCSR ;SEE IF BIT IS CLEAR. 

1574 005632 001401 BEQ ASD 

1575 005634 104003 ERROR sRXCSR BIT6 FAILED TO CLEAR. 

1576 005636 052777 000100 173234 ASD: BIS #BIT6,aRXCSR SET RXCSR BIT6. 

1577 005644 104011 SRESET ; ISSUE RESET TO CLEAR BIT. 

1578 005646 104012 SCOPE ; SCOPE 

1579 PRR A ERRATA EAT A TALE A ATER ETAT A HATTA AKA Ke AeA KAT eee AAT 
1580 005650 000024 AT24: 26 ;TEST NUMBER IS 24 

1581 005652 005674 AT25 sADDRESS OF NEXT TEST * 
1582 005654 000144 100. ; TEST ITERATION COUNT * 
1583 005656 005660 ATA ;SCOPE ENTRY POINT ' 
1584 PRRAAARAAAAA AAA AATAA AAA AAA AAAA AAT AA AAA TAA AAA AeAAKeAeAAHKette Atte eet 
1585 ;TEST THAT RXCSR BIT? IS CLEAR AND CAN BE READ RELIABLY. 

1586 005660 032777 000200 173212 ATA: BIT #B1T7,aRXCSR ;SEE IF RXCSR BIT7 IS CLEAR. 

1587 005666 001401 BEQ ATB ;BRANCH IF BIT IS CLEAR. 

1588 005670 104003 ERROR ;RXCSR BIT? IS NOT CLEAR. 

f+ +4 005672 104012 ATB: SCOPE 7 SCOPE 

1591 FERRARA AA RAHA AACE TATA AAA A TETRA AAA AAA AA TAA TAA TAA AA tee te Kee ete eA Tee 
1592 005674 000025 AT25: 25 ;TEST NUMBER 25 * 
1593 005676 005774 AT26 sADDRESS OF NEXT TEST * 
1594 005700 000144 100. TEST ITERATION COUNT * 
1595 005702 005704 AUA SCOPE ENTRY POINT * 
1596 FRARRAAHAAAH AHHH AHHH AAA A AAA TAHA AeA AAA AAA KAKA AAA AAA AAA Teer etetetee eet 
1597 ;TEST THAT RXCSR BITS CAN BE SET, CLEARED, AND THAT RESET CLEARS IT. 

1598 005704 032777 000400 173166 AUA: BIT #B1T8,a@RXCSR :SEE IF RXCSR BITS IS CLEAR. 

1599 005712 001402 BEQ AUB ;BRANCH IF BIT IS CLEAR. 

1600 005714 104003 ERROR ;RESET DID NOT CLEAR RXCSR BIT8 

1601 005716 gerd BR AUD 

1602 005720 052777 000400 173152 AUB: BIS #B1T8,aRXCSR ;SET RXCSR BITS. 

1603 005726 032777 000400 173144 BIT #B1T8,aRXCSR SEE IF BIT IS SET. 

1604 005734 001002 BNE AUC ;BRANCH IF BIT IS SET. 

1605 005736 104003 ERROR ;RXCSR BITS FAILED TO SET. 

1606 005740 000410 R AUD 
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AUC: BIC #B1T8,aRXCSR 
BIT #B1T8,aRXCSR 
BEQ AUD 
ERROR ; 
AUD: I$ #BITB,ARXCSR 
SRESET 
SCOPE 


;CLEAR RXCSR BIT8 
;SEE IF BIT IS CLEAR. 


;RXCSR BITS FAILED TO CLEAR. 
;SET RXCSR BITS. 

ISSUE RESET TO CLEAR BIT. 

: SCOPE 


WETTTTTITTTITITITTTTTITITI TILL Tti Titi, 


AT26: 26 

AT27 
100. 
AVA 


seneerareeeeerereeeeeeeeeeeeeetet 


; TEST ~ RXCSR BIT9 CAN BE SET, 


R 26 
TADDRESS OF NEXT TEST 
;TEST ITERATION COUNT 


; TEST NUMBE 


ed 


;SCOPE ENTRY POINT 


RERAARAAAARARAAAAARARAARERAERARERAEEKEAEEE 


CLEARED, AND THAT RESET eos IT. 


AVA: T #B1T9,aRXCSR :SEE IF RXCSR BIT9 IS 5t EAR 
EQ AVB :BRANCH IF BIT IS CLEAR 

_ bee ;RESET DID NOT CLEAR RXCSR BITS 
AVB: BIS #BIT9,aRXCSR ;SET RXCSR BIT. 

BIT #B1T9,aRXCSR :SEE IF BIT IS SET 

BNE AVC ;BRANCH IF BIT IS SET. 

ERROR ;RXCSR BITO FAILED TG SET. 

BR AVD 
AVC: BIC #BIT9,ARXCSR CLEAR RXCSR BIT9 

BIT #BIT9,aRXCSR ;SEE IF BIT IS CLEAR. 

BEQ AVD 

ERROR i RXCSR BITS FAILED TO CLEAR. 

AVD: I$ #BIT9,aRXCSR ;SET RXCSR BITS. 
SRESET TISSUE RESET TO CLEAR BIT. 
SCOPE : SCOPE 
RRR REE AEE ERA AEE AAARARAAARAREAARARAAAAAAEKARAARAREKER AEE 
AT27: 27 ; TEST NUMBER 27 * 

AT30 TADDRESS OF NEXT TEST * 

100. :TEST ITERATION COUNT * 

AWA ;SCOPE ENTRY POINT * 
RARER ERRATA AREA REAR AREER AERA RARER AERA AREA EAA AAA AA A 

A ge THAT RXCSR BIT10 CAN BE SET, CLEARED, AND THAT RESET “sagen: IT. 
AWA BIT #BITIO,ARXCSR ;SEE IF RXCSR BIT10 +e CLEAR 

BEQ AWB ;BRANCH IF BIT IS CLEAR 

— - ;RESET DID NOT CLEAR RXCSR BIT10 
AWB : BIS W#BIT10,aRXCSR  ;SET RXCSR BITI0. 

BIT #BIT10,aRXCSR ;SEE IF BIT IS SET. 

BNE AWC :BRANCH IF BIT IS SET 

— ase ;RXCSR BIT10 FAILED TO SET. 

AWC: BIC MBITIO,@RXCSR ;CLEAR RXCSR BIT10 

BIT WBITIO,aRXCSR ;SEE IF BIT IS CLEAR. 

BEQ AWD 

ERROR ;RXCSR BIT10 FAILED TO CLEAR. 

AWD: BIS WBITIO,aRXCSR ;SET RXCSR BIT1 

SRESET ; ISSUE RESET TO CLEAR BIT. 

SCOPE : SCOPE 
peeeeeerteeeteeretreetettetreereeetetenetteeeeneeeteneeeteaterereeeeeees 
AT30: 30 ; TEST NUMBER 30 * 

AT31 ;ADDRESS OF NEXT TEST * 


SEQ 0030 
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1663 006200 000144 100. sTEST ITERATION COUNT * 
1664 006202 006204 AXA ;SCOPE ENTRY POINT * 
1665 SRRREA REAR EA ARAA EATER AAA AAEAERA REAR E AERA AA HARE AAEAR KAA eeRe Hee Tee 
1666 :TEST THAT RXCSR BIT12 IS CLEAR AND CAN BE READ RELIABLY. 

1667 006204 032777 010000 172666 AXA: BIT WBITI2,aRXCSR  ;SEE IF RXCSR BIT12 IS CLEAR. 

1668 006212 001401 BEQ AXB BRANCH IF BIT IS CLEAR. 

1669 006214 104003 ERROR RXCSR BIT12 IS NOT CLEAR. 

1609 006216 104012 AXB: SCOPE SCOP E 

1672 SORA RRARARE REAR ATER A ATE A ETA A AHA ReKEKe Kee Aeeee etree tee Teese 

1673 006220 000031 AT31: 31 ;TEST NUMBER 31 * 
1674 006222 006244 AT32 ;ADDRESS OF NEXT TEST * 
1675 006224 000144 100. ;TEST ITERATION COUNT * 
1676 006226 006230 AYA ;SCOPE ENTRY POINT * 
1677 PRRAAARERAAAAAR EEE AE AAA THERA A HERE eAAARAATRAA AeA KKK eeeeeeeeetenee eet 

1678 A THAT RXCSR BIT13 IS CLEAR AND CAN BE READ RELIABLY 

1679 006230 032777 020000 172642 AYA BIT #BIT13,aRXCSR ;SEE IF RXCSR BIT13 IS CLEAR. 

1680 006236 001401 BEQ AYB ;BRANCH IF BIT IS CLEAR. 

1681 006240 104003 ERROR ;RXCSR BIT13 IS NOT CLEAR. 

1682 006242 104012 AYB: SCOPE : SCOPE 

1683 

1684 

1685 PRR AAAARRAAA ARETE ATTA AAT E HATHA ATTA TTA A AAT AERA AAA eee eee ee eA Hee eee 

1686 006244 000032 aTS2: 32 ;TEST NUMBER 32 * 
1687 006246 006270 AT33 ;ADDRESS OF NEXT TEST * 
1688 006250 000144 100. ;TEST ITERATION COUNT * 
1689 006252 006254 AZA :SCOPE ENTRY POINT * 
1690 RRA RARARAARAAAAAA AAA ATE AA TAA AERA e AAA ATK eee ee ee eeeteeAe ete eet etter ete ret 

1691 TEST THAT RXCSR BIT14 IS CLEAR AND CAN BE READ RELIABLY. 

1692 006254 032777 040000 172616 AZA: BIT #B1T14,aRXCSR ;SEE IF RXCSR BIT14 IS CLEAR. 

1693 006262 001401 BEQ AZB : BRANCH IF BIT IS CLEAR. 

1694 006264 104003 ERROR =RXCSR BIT14 IS NOT CLEAR. 

1695 006266 104012 AZB: SCOPE ; SCOPE 

1696 TOPS PEPSESESAESAEEEREEEERERESSEEEAESEA SESE EEE REESE RR RRR RRR RRA RRR RRR ARR RRR ADD SS 

1697 006270 000033 AT33: 33 ; TEST NUMBER 33 * 
1698 006272 006314 AT34 ADDRESS OF NEXT TEST * 
1699 006274 000144 100. TEST ITERATION COUNT * 
1700 006276 006300 AAAA :SCOPE ENTRY POINT ‘ 
1701 PEAR RAAAARA HAHA TAHA AAA A ATA TAA ATLA A AAA KAA eA Tee KAA e tet tte Kere rere ee 

1702 ;TEST THAT RXCSR BIT15 IS CLEAR AND CAN BE READ RELIABLY. 

1703 006300 032777 100000 172572 AAAA: BIT #BITIS,aRXCSR ;SEE IF RXCSR BIT15 iS CLEAR. 

1704 006306 001401 BEG AAAB ;BRANCH IF BIT IS CLEAR 

1705 006310 104003 ERROR RXCSR BIT15 IS NOT CLEAR. 

1706 006312 104012 AAAB: SCOPE ; SCOPE 

1708 

1709 eALL PREVIOUS TESTS MUST HAVE BEEN RUN SUCCESSFULLY PRIOR 

1710 ;TO RUNNING THE FOLLOWING TESTS. ALSO, THE JUMPER CONNECTOR 

1711 MUST BE INSERTED IN THE DC11 CABLE. TO THE MODEM. COMMENTS 

at REFER TO OPERATION WITH JUMPER INSERTED. 

1714 Seeeeeeeeeneeeeeeereeeereeeeeeeeeteeeteentteeneeenetenereeeeerererererer 

1715 006314 000034 AT34: 34 TEST NUMBER 34 

1716 006316 006372 AT35 ;ADDRESS OF NEXT TEST 

1717 006320 000144 100. ; TEST ITERATION COUNT 

1718 006322 006324 AFBA ;SCOPE ENTRY POINT 
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1719 FRRKRAKHKAAKAAAKAAHe AKA et etter eeeeeeeeeketeeeeeKettterettereeeeeeteneeee 
1720 TEST THAT CARRIER DETECT SETS AND CLEARS WHEN DATA TERMINAL 
Ws) s;READY SETS AND CLEARS. 

1723 006324 052777 000001 172546 AFBA:~ BIS #BITO,@RXCSR :SET DATA TERMINAL READY 

1724 006332 032777 000004 172540 BIT #BIT2,aRXCSR TEST CARRIER DETECT 

1725 006340 001002 BNE AFBB ;SHOULD BE SET 

1726 104003 ERROR sWASN'T 

1727 006344 000410 Bk FBC 

1728 006346 042777 000001 172524 AFBB:~ BIC #BITO,aRXCSR :CLEAR DATA TERMINAL READY 

1729 006354 032777 000004 172516 BIT #BIT2,aRXCSR sTEST CARRIER DETECT 

1730 006362 001401 BEQ AFBC 

1731 006364 104003 ERROR sWAS SET, ERROR 

1732 006366 104011 AFBC:  SRESET 

1733 006370 104012 SCOPE 

1734 FERRARA RARER ERE EERE EERE EEE EE REREREREREREEEERERAARERA ERATE RRR ES 
1735 006372 000035 AT35: 35 TEST NUMBER 35 

1736 006374 006532 A136 ADDRESS OF NEXT TEST 

1737 006376 000144 100. sTEST ITERATION COUNT 

1738 006400 006402 AGBA :SCOPE ENTRY POINT 

1739 SRARARE AAA ERATE RARER ERATE AAA AAA RA AEEEAEEEEEEREREEREREEREHERRARE REED 
1740 TEST THAT CARRIER TRANSITION (BIT 14) SETS WHEN CARRIER DETECT 
oe sCHANGES STATE, AND IS CLEARED WHEN RXCSR IS READ. 

1743 006402 042777 000001 172470 AGBA:~ BIC #BITO,aRXCSR CLEAR DATA TERMINAL READY 

1744 006410 017767 172464 172642 MOV A@RXCSR,RXCSRT  ;READ RXCSR 

1745 006416 032777 040000 172454 BIT #BITIG,AaRXCSR  ;TEST CARRIER TRANSITION 

1746 006424 001402 BEQ AGBB :WAS CLEAR GO TO AGBB 

1747 006426 104003 ERROR :WASN'T CLEAR 

1748 006430 000436 SR AGBE :GO0 TO SCOPE 

1749 006432 005277 172442 AGBB: INC @RXCSR :SETTING DATA TERMINAL READY 
1750 006436 000004 10T CAUSES CARRIER DETECT TO SET 
423 | SWI CH CAUSES CARRIER TRANSITION 
1753 006440 017767 172434 172612 MOV A@RXCSR,RXCSRT  ;MOVE RXCSR TO TEMPORARY LOCATION 
1754 006446 032767 040000 172604 BIT WBITIG,RXCSRT  ;TEST CARRIER TRANSITION 

1755 006454 001002 BNE AGBC :SHOULD BE SET GO TO AGBC 

1756 006456 104003 ERROR WAS CLEAR 

1757 006460 000422 ge AGBE G0 TO SCOPE 

1758 006462 032777 040000 172410 AGBC: BIT #BIT14,aRXCSR  ;CARRIER TRANSITION BIT SHOULD 
1759 ;HAVE BEEN CLEARED 

1760 006470 001402 BEG AGBD ;1T WAS GO TO AGBD 

1761 006472 104003 ERROR s1T WASN'T 

ine 006474 000414 BR AGBE 360 TO SCOPE 

1764 006476 042777 000001 172374 AGBD:~ BIC #BITO,AaRXCSR CLEARING DATA TERMINAL READY 
1765 ;CAUSES CARRIER DETECT TO CLEAR 
1766 :BUT CARRIER TRANSITION 

1767 sWILL NOT SET 

1768 006504 017767 172370 172546 MOV @RXCSR,RXCSRT  ;MOV RXCSR TO TEMPORARY LOCATION 
1769 006512 032767 040000 172540 BIT #BITIG,RXCSRT  ;TEST CARRIER TRANSITION 

1770 006520 001402 BEQ AGBE ;SHOULD BE CLEAR 

1771 006522 104003 ERROR :1T WASN'T 

1772 006524 000400 Ae AGBE 

1773 006526 104011 AGBE : SRESET ; ISSUE RESET 

1774 006530 104012 SCOPE : SCOPE 
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1775 PRRAKAAKKKHKAKH KETC eetteteKeeKeeKeKkeeteteeteteeeeteeeteteeeeeeees 
1776 
1777 006532 000036 AT36: 36 ; TEST NUMBER 36 
1778 006534 006646 AT37 sADDRESS OF NEXT TEST 
1779 006536 000144 100. :TEST ITERATION COUNT 
1780 006540 006542 AMBA SCOPE ENTRY POINT 
1781 RRA ERRATA E REET EA AEE TERT EAEERAAERAEAAAATRERAAAHRAAHKAHARA TAKA Ke Tee 
1782 :TEST THAT CARRIER TRANSITION SETTING CAUSES ERROR (BIT 15 RXCSR) TO 
ie? ;SET AND THAT READING RXCSR CLEARS ERROR. 

1785 006542 042777 000001 172330 AMBA:~ BIC #BITO,aRXCSR CLEAR DATA TERMINAL READY 
1786 006550 005277 172324 INC ARXCSR SET DATA TERMINAL READY 

1787 006554 000004 10T 

1788 006556 017767 172316 172474 MOV A@RXCSR,+#RXCSRT ;MOVE RXCSR TO TEMPORARY LOCATION 
1789 006564 032767 100000 172466 BIT WBITIS,RXCSRT  ;TEST ERROR BIT 

1790 006572 001002 BNE AMBB sERROR BIT SHOULD BE SET 

1791 006574 104003 ERROR 

1792 006576 000421 BR AMBD 

1793 006600 032777 100000 172272 AMBB:~ BIT #BIT15,aRXCSR  ;TEST ERROR BIT 

1794 006606 001402 BEQ AMBC ;SHOULD BE CLEAR 

1795 006610 104003 ERROR 

1796 006612 000413 B AMBD 

1797 006614 042777 000001 172256 AMBC: BIC #BITO,aRXCSR :CLEAR DATA TERMINAL READY 
1798 006622 017767 172252 172430 MOV A@RXCSR,RXCSRT  ;MOV RXCSR TO TEMPORARY LOCATION 
1799 006630 032767 100000 172422 BIT #BITIS,RXCSRT  ;TEST ERROR BIT 

1800 006636 001401 BEQ AMBD ;SHOULD BE CLEAR 

1801 006640 106005 ERROR 

1802 006642 104011 AMBD:  SRESET ; ISSUE RESET 

1803 006644 104012 SCOPE > SCOPE 

1808 

1806 eee ee ee ate 
1807 006646 000037 AT37: 37 TEST NUMBER 37 

1808 006650 006742 AT40 “ADDRESS OF NEXT TEST 

1809 006652 000144 100. :TEST ITERATION COUNT 

1810 006654 006656 AJBA :SCOPE ENTRY POINT 

1811 PRCA AAA AA AAA AA AERA AAA AAA A AAA AERA RAE AAREAAAA AAA KA REAR REAR A ARATE 
1812 :TEST THAT CLEAR TO SEND (BIT1) SET/CLEARS WHEN DATA TERMINAL 
4H sREADY SETS/CLEARS. 

1815 006656 042777 000001 172214 AJBA:~ BIC #BITO,aRXCSR :CLEAR DATA TERMINAL READY 
1816 032777 000004 172212 BIT #BIT2,aTXCSR sTEST CLEAR TO SEND 

1817 006672 001400 BEQ AJBB 

1819 

1820 006674 052777 000001 172176 AJBB: BIS #BITO,aRXCSR SET DATA TERMINAL READY 

1821 006702 032777 000002 172174 BIT #BIT1,aTXCSR TEST CLEAR TO SEND 

1822 006710 001002 BNE AJBC ‘BRANCH IF SET 

1823 006712 104003 ERROR :CLEAR TO SEND SHOULD BE SET 
1824 006714 000410 AR AJBD 

1825 006716 042777 000001 172154 AJBC: BIC #BITO,aRXCSR CLEAR DATA TERMINAL READY 
1826 006724 032777 000002 172152 BIT #BIT1,aTXCSR TEST CLEAR TO SEND 

1827 006732 001401 BEQ AJBD 

1828 006734 104003 ERROR :CLEAR TO SEND SHOULD BE CLEAR 
1829 006736 104011 AJBD:  SRESET ISSUE RESET 

1830 006740 104012 SCOPE ; SCOP 
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SRAARAARRAAAARAERAR AAA RAAT AAAAAEAAARAAAERAAAKERAKETA AAA KAKER AAA 


AT40: 40 ; TEST NUMBER 40 
AT41 ;ADDRESS OF NEXT TEST 
100. TEST ITERATION COUNT 
AKBA ;SCOPE ENTRY POINT 


ICSI ITI ie tii iii titi iii rit iititisiviiiiiiiitiiii iii ii r irre rere ree 
;TEST THAT RING (BIT 13 RXCSR) SETS WHEN REQUEST TO 

;SEND SETS AND THEN CLEARS; AND RING CLEARS WHEN RXCSR IS READ. 

AND THAT RESET CLEARS RING. 


AKBA: BIC WBITO,@TXCSR § ;CLEAR REQUEST TO SEND 
ABB: BIS #BITO.aTXCSR  :SET REQUEST TO SEND 
BIC #BITO.aTXCSR 
BIT #BIT1$,aRXCSR ; TEST RING 
BNE AKBC 
ERROR :RING SHOULD BE SET 
BR AKBE 
AKBC: BIT #BIT13,@RXCSR TEST RING 
BEQ AKBD 
ERROR :RING SHOULD BE CLEAR 
BR AKBE 
AKBD: BIS #BITO,aTXCSR =; SET 
BIC #BITO.aTXCSR § :RING 
RESET 
BIT WBIT13,ARXCSR TEST RING 
BEQ AKBE ‘BRANCH IF CLEAR 
ERROR ‘RING SHOULD BE CLEAR AFTER RESET 
:BUT WAS SET 
AKBE:  SRESET : ISSUE RESET 
SCOPE : SCOPE 


. 
PRR RAE REAR EERE EEE AEE REA E AAR RA AERA EERE RERAAAAARAR ARTA KEE 


AT41: 41 ;TEST NUMBER 41 
AT42 ADDRESS OF NEXT TEST 
100. ;TEST ITERATION COUNT 
AOBA ;SCOPE ENTRY POINT 


PRR AREER A RARE RATATAT AEA A TEA AAA AAA AERA R AAA RAK KARA EAT e 


TEST THAT ERROR (BIT 15 RXCSR) SETS WHEN RING SETS. 


AOBA: BIC WBITO,aTXCSR | ;SET REQUEST TO SEND 
BIT #B1T15,aRXCSR  :TEST ERROR BIT 
EQ AOBB 
ERROR 
BR OBD 
AOBB: BIS #BITO,aTXCSR  ;SET REQUEST TO SEND 
BIC #BITO.aTXCSR | :CLEAR REQUEST TO SEND 
BIT #BIT15,aRXCSR  :TEST ERROR BIT 
BNE BC 
ERRGR 
BR AOBD 
aoBc: Bic WBITO,aTXCSR  ;CLEAR REQUEST TO SEND 
BIT #BIT15,aRXCSR  :TEST ERROR BIT 
BEQ AOBD 
RROR 
AOBD:  SRESET : ISSUE RESET 
SCOPE = SCOPE 


SEQ 0034 
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1887 
1888 FRR EAE RATE EAE R AREA EAA AAAE AA AAAAAARERERAAAETEAAKKKERR ARATE H ES 
1889 007166 000042 AT42: 42 sTEST NUMBER 42 
1890 007170 007272 AT43 sADDRESS OF NEXT TEST 
1891 007172 000144 100. :TEST ITERATION COUNT 
1892 007174 007176 ALBA SCOPE ENTRY POINT 
1893 SRRRRARRAAEE AREER EE ERAT TERE REAR AAA AEAAAEREAAREAAAEARAEARAREHERA AAAS 
1894 ;TEST THAT SUPERVISORY RECEIVE DATA (BIT 15 TXCSR) SETS/CLEARS 
244 WHEN SUPERVISORY XMIT DATA SETS/CLEARS. 
1897 007176 64.777 000400 171674 ALBA: BIC #B1T8 @RXCSR CLEAR SUPERVISOR XMIT DATA 
1898 007204 032777 100000 171672 BIT #BIT15,aTXCSR :TEST SUPERVISORY RECEIVE DATA. 
1899 007212 001402 BEQ ALBB 
1900 007214 104903 ERROR ;SHOULD HAVE BEEN CLEAR 
1901 007216 000423 ge ALBD 
1902 007220 052777 000400 171652 ALBB: BIS #BIT&,AaRXCSR SET SUPERVISORY XMIT DATA 
1903 007226 104016 DELAY :DEL 1 MSEC. pit 
1904 007230 000001 1 


1905 007232 032777 100000 171644 BIT #B1T15,aTXCSR ;TEST SUPERVISORY RECEIVE DATA 

1906 007240 001002 BNE ALBC 

1907 007242 104003 ERROR ;SHOULD HAVE BEEN SET 

1908 007244 000410 BR ALBD 

1909 007246 042777 000400 171624 ALBC: BIC 15118 @RXCSR ;CLEAR SUPERVISORY XMIT DATA 

1910 007254 032777 100000 171622 BIT wB1T15, aTXCSR ;TEST SUPERVISORY RECEIVE DATA 

1911 007262 001401 BEQ ALBD 

1912 007264 104003 ERROR ;SHOULD HAVE BEEN CLEAR 

1913 007266 104011 ALBD: SRESET ; ISSUE RESET 

1914 007270 104012 SCOPE ; SCOPE 

1915 PRRRAAA ARERR RATATAT ATTA TEE TTA E TATA ATTRA TARA AA KATA ARATE eee 
1916 007272 000043 AT43: 43 ; TEST NUMBER 43 * 
1917 007274 007376 AT44 ADDRESS OF NEXT TEST a 
1918 007276 000144 100. ;TEST ITERATION COUNT * 
1919 007300 007302 ABAA ;SCOPE ENTRY POINT t 
1920 PRRAARA RAAT AAA AAA AT AAA TATA AA AAA AAA AAA TAAAAAAAA AAA AH AA ete eee eee 
1921 ;TEST THAT RESET CLEARS ALL TXCSR BITS, AND SETS BIT 7 (READY) 

1922 007302 012767 000340 170466 ABAA: MOV #PRTY7,PSW 3 SET PRIOR vv 7. 

1923 007310 012777 177777 171566 MOV #-1 /aTXCSR ;SET ALL POSSIBLE Mh IN TXCSR 

1924 007316 104011 SRESET : ISSUE RESET TO CLEAR BITS 

1925 007320 022777 000200 171556 CMP #B1T7,aTXCSR ;SEE IF ONLY BIT 7 IS SET. 

1926 007326 001422 BEQ ABAB ;BRANCH IF ONLY BIT 7 IS SET 

1927 007330 017767 171550 171720 MOV aTXCSR, TXCSRT ;SAVE CONTENTS OF TXCSR 

1928 007336 012767 000200 171720 MOV #B1T7, TEMP ;MOVE EXPECTED TXCSR TO TEMP. 

1929 007344 004567 173730 JSR %5,0ACNV :G0 TO OCTAL TO ASCII CONVERT. 

1930 007350 001264 TEMP ;SOURCE ADDR. 

1931 007352 015461 ATXSB :DESTINATION ADDR. 

19 007354 000006 6 : #OF DIGITS TO CONVERT 

1933 007356 004567 173716 JSR %5 ,OACNV 3GO0 TO OCTAL TO ASCII CONVERT. 

1934 7362 001256 TXCSRT ;SOURCE ADDR. 

1935 007364 015476 ATXWAS DESTINATION ADDR. 

1936 7366 000006 6 3#OF DIGITS TO CONVERT 

1937 007370 104015 ERROR1 RESET FAILED TO Si “ALL BITS EXCEPT 
1938 007372 015446 ATXCSR :BIT T 7 = SEE PRINTOUT 

+44 007374 104012 ABAB : SCOPE ; SCOPE 

1941 REAR RRE REAR AEA AAAA AAA AAA AAA AAAAAAAAAAERARAAAAAAARAAARKAReARA eRe 
1942 007376 000044 AT44: 44 ; TEST NUMBER 44 a 
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1993 007606 000012 10. STEST ITERATION COUNT 

1994 007610 007612 AEAA ;SCOPE ENTRY POINT 

1995 peeeeeeeeeeeeeeeeeeeeeeeeeeeeereeeeaeneeeeeeeeeeeeeeeedredereeeeereeeet 

1996 sTEST THAT READY BIT (TXCSR BIT 7) BECOMES SET NO LATER THAN 1099 MSECS AFTER 
1997 LOADING TXBUF WITH TRANSMIT SPEED a, ue oe (TXCSR BITS 3 AND 4 

1998 007612 005077 171270 EAA: CLR aTXBuF ;LOAD T 


CZDCAD.P11 10-JUN-80 47 SEQ 0036 =S| 
1943 007400 007552 AT45 ADDRESS OF NEXT TEST * 
1944 007492 000144 100. ;TEST ITERATION COUNT * 
1945 007404 007406 ACAA ;SCOPE ENTRY POINT * 
1946 SReeeeeeeeeeeeeeeeeeeeeeeeeeeeedeeeeeteneneatteteteneeeeeeeteceneeeeeee 
1947 :TEST THAT RESET CLEARS ALL RXCSR BITS EXCEPT BIT 0 (DATA TERMINAL READY) 
1948 ; RING, AND THE BREA K BIT 
1949 007406 012767 000340 170362 ACAA: MOV #PRTY7,PSW ;SET PRIORITY 7 
1950 007414 042777 000001 171456 BIC WBITO,@RXCSR | CLEAR DATA TERM.READY 
1951 007422 012777 177775 171450 MOV We77t5 gARXCSR :SET ALL POSSIBLE BITS IN RXCSR 
1952 007430 052777 000030 171446 BIS #30, aTXCSR :SET MAINT BIT 
1953 007436 005077 171444 CLR atx bur : TRANSMIT A CHAR 
1954 007442 105777 171436 TSTB  aTXCSR [WAIT FOR 
1955 007446 100375 BPL 74 ; TRANSMITTER TO FINISH 
1956 007450 012777 000001 171430 MOV #1, aTXBUF ; TRANSMIT ANOTHER CHAR. 

1957 007456 105777 171422 TSTB  aTXCSR T FOR 

1958 007462 100375 BPL 74 : TRANSMITTER TO FINISH 

1959 007464 104011 SRESET s ISSUE RESET TO CLEAR BITS. 

1960 007466 017767 171406 171564 MOV @RXCSR,RXCSRT MOVE RXCSR CONTENTS TO RXCSRT 

1961 007474 022767 000005 171556 CMP #5, RXCSRT 7SEE IF ONLY BIT O IS SET 

1962 007502 001417 BEQ ACAB ‘BRANCH IF ONLY BIT O IS SET. 

196% 007504 012767 000005 171552 MOV #5, TEMP 

1964 007512 004567 173562 JSR %5,0ACNV 360 TO gl! TO ASCIi CONVERT. 

1965 007516 001264 TEMP ;SOURCE A 

1966 007520 015520 ARXSB SOPSTINATION, ADDR. 

1967 007522 000006 6 MOF DIGITS TO CONVERT 

1968 007524 004567 173550 JSR %5,OACNV :GO TO OCTAL TO ASCII CONVERT. 

1969 007530 001260 RXCSRT ;SOURCE ADDR. 

1970 porate 015535 ARXWAS [DESTINATION ADDR. 

1971 0075 000006 6 ;MOF DIGITS TO CONVERT. 

1972 007536 104015 ERROR1 sRESET FAILED TO CLEAR ALL BITS EXCEPT 
1973 007540 015505 ARXCSR ;BIT 0. SEE ERROR PRINTOUT. 

1974 007542 042777 000001 171330 ACAB: BIC #BITO,aRXCSR ;CLEAR DATA TERM. READY 

1975 007550 104012 SCOPE 3S E 

1976 RARER ARR AREEEAR EEE R AE A A AEAAAA AAA AAAAAAAAAAAAARAARAEAAE TARA 
1977 007552 000045 ATGS: 45 TEST NUMBER 45 * 
1978 007554 007602 AT46 sADDRESS OF NEXT TEST * 
1979 007556 000144 100. TEST ITERATION COUNT * 
1980 007560 007562 ADAA ;SCOPE ENTRY POINT * 
1981 PRR eeeeeeeAAAAAAHA HATA AA ATA TAAAAA AA AAA KeKKeeeeetet terre Atte tteeeeterer es 
1982 ;TEST THAT LOADING TXBUF (TRANSMITTER A ae CLEARS TXCSR BIT 7 (READY) 
1983 007562 0050 171320 ADAA: CLR aTXBUF ;LOAD TXBUF 

1984 007566 105777 171312 TSTB aTXxcsR sTEST TXCSR BIT 7 (READY BIT) 

1985 007572 100001 BPL ADAB * BRANCH IF BIT NOT SET. 

1986 007574 104003 ERROR sERROR. LOADING TXBUF FAILED TO CLEAR READY. 
1987 007576 104011 ADAB: SRESET s ISSUE RESET TO SET READY. 

Mb « 007600 1040%2 SCOPE SCOPE. 

1990 PRRRAAHARAAA HAA TAA AAT ATA TAT AAA ATTA AAA AAAAATAAAAAAAAAA TL AAe AAA eee Ke Tee et 
1991 007602 000046 AT46: 46 ; TEST NUMBER 46 

1992 007604 007634 AT47 SADDRESS OF NEXT TEST 
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1999 007616 104016 DELAY ;DELAY 1000 MSECS APPROX. 

2000 007620 001750 1000. 

2001 007622 105777 171256 TSTB aTXCSR ;SEE IF READY BIT IS SET 

2002 007626 100401 BMI AEAB BRANCH IF READY IS SET 

2003 007630 104003 ERROR ;READY NOT SET 200 MSECS AFTER BUFFER 
2004 ;LOAD. TX SPEED = 00. 

sit 007632 104012 AEAB: SCOPE SCOPE 

2007 FERRARA AEE EET A TATA AEA E TATA T ERAT AAA KATA KE KARA eee eeeeeeeeeet 
2008 007634 000047 AT4?7: 47 ; TEST NUMBER 47 * 
2009 007636 007674 AT50 ;ADDRESS OF NEXT TEST * 
2010 007640 000012 10. ;TEST ITERATION COUNT * 
2011 007642 007644 AFAA ;SCOPE ENTRY POINT * 
2012 RRA RAA AEA AAA ATER ATTA AAA AAAAAARATAAKAAKeAeee AAA A AHH eee 
2013 TEST THAT READY BIT (TXCSR BIT 7) BECOMES SET NO LATER THAN 500 —— AFTER 
2014 > LOADING TXBUF, WITH TRANSMIT SPEED SET TO 01 (TXCSR BITS 3 AND 4) 

2015 007644 052777 000010 171232 AF AA: BIS #10,aTXCSR :SET " Bt TO 01. 

2016 007652 005077 171230 CLR aTXBuUF LOAD 

2017 007656 104016 DELAY DELAY "300. MSECS 

2018 007660 000764 500. 

2019 007662 105777 171216 TSTB aTXCsSR ;SEE IF READY = “ SET 

2020 007666 100401 BM! AF AB = BRANCH IF READY IS SET 

2021 007670 104003 ERROR ;READY NOT SET 500° MSECS AFTER BUFFER 
2022 ;LOAD. TX SPEED = 01. 

2023 007672 104012 AF AB: SCOPE SCOPE. 
2024 PRRRA AAR A RARE RATATAT AAA ATTA TE TATRA AAA ARTA A eee AAA ATTA Ree eee 
2025 007674 000050 ATSO: 50 ;TEST NUMBER 50 * 
2026 007676 007734 AT51 S ADDRESS OF NEXT TEST * 
2027 007700 000012 10. ‘TEST ITERATION COUNT * 
2028 007702 007704 AGAA ;SCOPE ENTRY POINT ® 
2029 PITITTIIT LILI TTT TTT TT LITT iTi tii tiiiiiiitii iii titi ti ii titi 
2030 TEST THAT READY BIT (TXCSR BIT 7) BECOMES SET NO LATER THAN 400 _—— AFTER 
2031 ; LOADING TXBUF, WITH TRANSMIT SPEED SET TO 10 (TXCSR BITS 3 AND 4) 

2032 007704 052777 000020 171172 AGAA BIS #20,aTXCSR 3SET ,* tg TO 10. 
2033 007712 005077 171170 CLR aTXBUF ‘LOAD T 
2034 007716 104016 DELAY ;DELAY 400. MSECS 

2035 007720 000620 400. 
2036 007722 105777 171156 TSTB aTXxcsR ;SEE IF READY BIT IS SET 
2037, 007726 100401 BM! AGAB ;BRANCH IF READY BIT IS SET 

2038 007730 104003 ERROR ;READY NOT SET 200 MSECS AFTER BUFFER 
2039 ;LOAD. TX SPEED = 10. 

goed 007732 104012 AGAB: SCOPE ; SCOPE 
2042 eee memes RT ree ares a 
2043 007734 000051 AT51: 51 ;TEST NUMBER 51 * 
2044 007736 007774 AT5S2 S ADDRESS OF NEXT TEST * 
2045 007740 000012 10. :TEST ITERATION COUNT . 
2046 007742 007744 AHAA SCOPE ENTRY POINT * 
2047 PRRRAeAeKeee eee eee eee eee eee eee ee eae eA AeA eAteeeeAeeteeeeteeereererrreret 
2048 TEST THAT READY BIT (TXCSR BIT 7) BECOMES SET NO LATER THAN 230, _ AFTER 
2049 * LOADING TXBUF, WITH TRANSMIT SPEED SET TO 11 (TXCSR BITS 3 AND 4 

2050 007744 052777 000030 171132 AHAA: BIS #30,aTXCSR ty a " m+ is TO 30. 

051 007752 005077 171130 CLR aT XBuF LOAD 

052 007756 104016 DELAY DELAY RD MSECS. 


37 250. 
054 007762 105777 171116 TSTB aTXCSR ;SEE IF READY BIT IS SET. 
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2055 007766 100401 BM! AHAB :BRANCH IF READY BIT IS SET. 

2056 007770 104003 ERROR *READY NOT SET 200 MSECS AFTER 

2057 :BUFFER LOAD. TX SPEED = 11. 

see 007772 104012 AHAB: SCOPE :SCOP 

2060 FRR ARERR EAA E TREE EEE A AEE E EERE AAA AEEEAAEEEEAAEEE EEE AAE AREA ARA RARE EE 

2061 007774 000052 ATS2: 52 : TEST NUMBER 52 * 

2062 007776 010212 AT53 ADDRESS OF NEXT TEST * 

2063 010000 000144 100. TEST ITERATION COUNT * 
010002 010004 AIAA sSCOPE ENTRY POINT 4 

2065 SRRRRARRReKHHKeKeeeeetet POSTS e TT Te Ce TTT eT TTT TOOT TTTTTTTTITITITTTTTT TTT 

2066 :TEST THAT TRANSMIT SPEEDS ARE ARRANGED IN ASCENDING ORDER BY CHECKING THAT TIME 

2067 :T0 noms A do BIT 7) DECREASES AS A HIGHER SPEED IS SELECTED. 

2068 010004 005067 171236 AIAA CTR sCLEAR CTRA THROUGH CTRD 

2069 010010 005067 171234 ete TRB : (USED TO COUNT ELAPSED TIME.) 

2070 010014 005067 171232 CLR CTRC 

2071 010020 005067 171230 CLR CTRD 

2072 010024 042777 000030 171052 BIC #30,aTXCSR sSELECT TX SPEED 0 

2073 010032 004767 000110 JSR %7,ALAS ‘OUTPUT CHAR AND TIME. 

2074 010036 066767 000146 171202 ADD ALAST,CTRA ADD ELAPSED TIME TO CTRA. 

2075 010044 052777 000010 1710 BIS #10,aTXCSR :SELECT TX SPEED 1 

2076 010052 004767 000070 JSR %7,AlAS OUTPUT CHAR AND TIME. 

2077 010056 066767 000126 171164 ADD ALAST, CTRB :ADD ELAPSED TIME TO CTRB. 

2078 010064 042777 000030 171012 BIC #30,aTXCSR SELECT TX SPEED 2 

2079 010072 052777 000020 171004 BIS #20,aTXCSR 

2080 010100 004767 000042 JSR %7,ALAS OUTPUT CHAR AND TIME. 

2081 010104 066767 000100 171140 ADD ALAST, CTRC sADD ELAPSED TIME TO CTRC. 

208. pitts 52777 000030 170764 BIS #30, atxcsR SELECT TX SPEED 3 

2083 010120 767 000022 JSR 47, ALAS sOUTPUT CHAR AND TIME. 

2084 010124 066767 000060 171122 ADD ALAST,CTRD ADD ELAPSED TIME TO CTR 

2085 010132 004767 004176 JSR 47, CMPT sCHECK THAT CTRA THROUGH” CTRD CONTAIN 

2086 010136 000402 GR ALAF ‘DESCENDING VALUES 

2087 010140 104015 ERROR} ; TRANSMIT SPEEDS = ARRANGED IN 

2088 010142 015544 ETXTIM ‘ASCENDING ORDER 

2089 010144 104012 AIAF: SCOPE : SCOPE 

2090 010146 005067 000036 AIAS: CLR ALAST :CLEAR ELAPSED TIME COUNTER. 

2091 010152 105777 170726 TSTB @TXCSR sWAIT FOR TX READY. 

2092 010156 100375 BPL 274 

2093 010160 104016 DELAY sWAIT 20 MSECS. 

2094 010162 000024 . 

2095 010164 005077 170716 CLR aTXxBUF LOAD TXBUF. 

2096 010170 104016 AIASA: DELAY DELAY 1 MSEC. 

2097 010172 000001 1 

2098 010174 005267 000010 INC ALAST : INCREMENT ELAPSED TIME COUNTER. 

2099 010200 105777 170700 TSTB aTXCSR =READY SET? 

2100 010204 100371 BPL ALASA ;BRANCH IF READY NOT SET. 

2101 010206 000207 RTS 17 “EXIT. 

2102 010210 AIAST: OPEN 

2103 ee te ee ee eee OE ee eee 

2104 010212 000053 ATS3: 53 TEST NUMBER 53 * 

2105 010214 010376 ATS4 SADDRESS OF NEXT TEST ® 

3106 010216 000144 100. sTEST ITERATION COUNT s 

2107 010220 010222 “SCOPE ENTRY POINT . 

2108 PRRARAAKKARAKRAAAA AAA AAA AACE AA AAA AAA KATA KEK AAeA KAKA Ket eRe KeAteeeKet eee 

2109 *TEST FOR CORRECT OPERATION OF STOP CODE BIT (TXCSR BIT 8) BY CHECKING THAT TIME. 

2110 SREQUIRED TO COMPLETE TRANSMISSION OF 2 CONSECUTIVE CHARACTERS WITH STOP BIT 
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CZDCAD SEQ 0039 
2111 sSET 10 0 IS eee THAN TIME REQUIRED WITH STOP CODE BIT SET TO A 1. 
2112 010222 005067 171020 AJAA: CLR TRA sCLEAR CTRA AND CTRB 
2113 oieess 00506 171016 CLR CTRB : (ELAPSED TIME COUNTERS). 

2114 010232 042777 000400 170644 BIC #BITB,aTXCSR ;SET STOP CODE TO 0 (2 STOP CODES) 
2115 010240 004767 000044 JSR 7,AJA sOUTPUT CHAR AND TIME 
2116 010244 066767 000124 170774 ADD AJAST,CTRA :ADD ELAPSED TIME TO CTRA 
2117 010252 052777 000400 170624 BIS #BIT8,aTXCSR :SET STOP CODE TO 1 (1 STOP CODE) 
2118 010260 004767 000024 JSR %7,AJAS sOUTPUT CHARACTER AND TIME. 
2119 010264 066767 000104 170756 ADD AJAST,CTRB :ADD ELAPSED TIME TO CTRB 
2120 010272 026767 170750 170750 CMP CTRA,CTRB :SEE IF CTRA IS GREATER THAN CTRB 
2121 010300 101002 BHI AJAB sBRANCH IF CTRA IS GREATER. 
2122 010302 104015 ERROR sERROR. ELAPSED TIME FOR 2 STOP CODE 
sig? 010304 015606 ESTPCD 3 + tag NOT GREATER THAN FOR 1 STOP 
2125 010306 104012 AJAB: SCOPE 7 SCOPE 
2126 010310 005067 000060 AJAS: CLR AJAST :CLEAR ELAPSED TIME COUNTER AJAST 
2127 010314 105777 170564 TSTB aTXCSR sWAIT FOR TX READY. 
2128 010320 100375 BPL 74 
2129 010322 104016 DELAY ;WAIT 20 MSECS. 
2130 010324 000024 20. 
2131 010326 005077 170554 CLR aTXxBuF ;LOAD TXBUF 
2132 010332 104016 AJASA: DELAY sDELAY 1 MSEC 
2133 010334 000001 1 
2134 010336 005267 000032 INC AJAST : INCREMENT ELAPSED TIME COUNTER 
2135 010342 105777 170536 TSTB aTXCcsR sREADY SET? 
2136 010346 100371 BPL AJASA :BRANCH IF READY NOT SET. 
2137 010350 005077 170532 CLR aT XBuUF ;LOAD TXBUF. 
2138 010354 104016 AJASB: DELAY :DELAY 1 MSEC. 
2139 010356 000001 1 
2140 010360 005267 000010 INC AJAST : INCR ELAPSED TIME COUNTER. 
2141 010364 105777 170514 TSTB aTXxcsR s;READY SET? 
2142 010370 100371 BPL AJASB ;BRANCH IF READY NOT SET. 
2143 010372 000207 RTS 17 sEXIT 
ores 010374 000000 AJAST: OPEN sELAPSED TIME COUNTER, 
2146 
2147 seat eeeeneteteeeeteteeeerreeeteteeereeeeeteeerKAtKeeeeeeeeeeterereeeenes 
2148 010376 000054 AT54: 54 s; TEST NUMBER 54 a 
2149 010400 010622 ATS5 zADDRESS OF NEXT TEST * 
2150 010402 000144 100. :TEST ITERATION COUNT * 
2151 010404 010406 AKAA sSCOPE ENTRY POINT * 
2152 peeeeeeeeneearereererererererererereertneeereeeeeeeereneeeeeeeeeeeeeneTe 
2153 sTEST FOR CORRET OPERATION OF CHARACTER LENGTH SELECTION (RXCSR BITS 9 AND 10) 
2154 :BY CHECKING THAT TIME REQUIRED FOR OUTPUTTING A CHARACTER IS LONGEST FOR 
2155 :8 BIT CODE THAN FOR 7 BIT CODE ETC. 
2156 010406 005067 170634 AKAA: CLR CTRA :CLEAR CTRA THROUGH CTRD. 
2157 010412 005067 170632 CLR cCTRB : (ELAPSED TIME COUNTERS). 
2158 010416 005067 170630 CLR cTRC 
2159 010422 005067 170626 CLR CTRD 
2160 pier oth 7 003000 170444 BIC #3000 ,aRxCSR ;SET CHAR LENGTH TO 00 (8 BIT CODE). 
2161 0104 767 000116 JSR 27, AKAS :OUTPUT CHARACTER AND TIME. 
3168 010440 66 154 ADD AKAST,CTRA :ADD ELAPSED TIME TO CTRA 
163 010446 3000 170424 BIC #3000 ,aRxCSR :SET CHAR LENGTH TO 01 (7 BIT CODE). 
164 010654 052777 001000 170416 BIS #1000 ,arxcsr 
165 010462 000070 JSR 17, AKAS OUTPUT CHARACTER AND TIME. 
2166 0104666 066767 000126 170554 ADD AKAST,CTRB :ADD ELAPSED TIME TO CTRB. 
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SEQ 0040 
BIC #3000 ,aRXCSR ;SET CHAR LENGTH TO 10 (6 BIT CODE) 

Bis #2000, aRXCSR 
JSR %7,AKAS ;OUTPUT CHARACTER AND TIME. 


ADD AKAST,CTRC ;ADD ELAPSED TIME TO CTRC 
BIS #3000, aRXCSR :SET CHAR LENGTH TO 11 (5 BIT CODE) 
JSR %7,AKAS ;OUTPUT CHACTER AND TIME 
ADD AKAST,CTRD ;ADD ELAPSED TIME TO CTRD 
JSR %7,CMPT ;CHECK THAT CTRA THROUGH CTRD 
BR AKAB ;DESCENDING VALUES. 
ERROR1 ;TX CHARACTER LENGTH NOT ARRANGED 
ETCLGT ;IN DESCENDING ORDER. 
FKAB: SCOPE ; SCOPE 
AKAS: CLR AKAST ;CLEAR ELAPSED TIME COUNTER AKAST 
2 —— ;WAIT FOR TX READY. 
L * 
ee ;WAIT 20 MSECS. 
CLR aTXBUuF ;LOAD TXBUF 
AKASA: ;DELAY 1 MSEC 
INC AKAST ; INCREMENT ELAPSED TIME COUNTER 
TSTB aTXCSR ;READY SET? 
BPL AKASA ;BRANCH IF READY NOT SET 
RTS x7 sEXIT 
AKAST: OPEN ELAPSED TIME COUNTER 
FERRER AERA EEE EERE EEE AREER AAR ERA AREER ERE ARERR RET 
AT55: 55 ;TEST NUMBER 55 * 
AT5S6 ADDRESS OF NEXT TEST * 
100. ;TEST ITERATION COUNT * 
ALAA ;SCOPE ENTRY POINT * 


RARER ARERR AEE A AERA ETAT ARTA AAA A TTA TEAC e eee eee 
;TEST THAT OUTPUTTING A CHARACTER WITH THE MAINTENANCE BIT SET (TXCSR BIT 2) 
;RESULTS IN DONE BIT SETTING (RXCSR BIT 7) NO LATER THAN 200 MSECS, AND 

; THAT RESET INSTRUCTION CLEARS THE DONE BIT 

ALAA: BIS #B1T2,aTXCSR ;SET MAINTENANCE (TXCSR BIT 2) 


CLR aTXBUF ;LOAD TXBUF 
peLAY sWAIT 200 MSECS. 
TSTB @RXCSR ;SEE IF DONE BIT IS SET 
BMI ALAB ;BRANCH IF DONE BIT IS SET 
ERROR ;DONE BIT FAILED TO SET 
BR ALAC 
ALAB:  SRESET ; ISSUE RESET TO CLEAR DONE BIT 
TSTB @RXCSR ;SEE IF DONE BIT IS CLEARED 
BPL ALAC 7BRANCH IF DONE BIT IS CLEARED 
ERROR ;RESET FAILED TO CLEAR DONE BIT 
ALAC: SCOPE ; SCOPE 
FRAME RARER AAR ATER AAA ATER AA TAA AAA AAA AER AARAAAA AAA AAA AAAAKAA AAA AEE 
A156: 56 ;TEST NUMBER 56 * 
A157 sADDRESS OF NEXT TEST * 
100. ;TEST ITERATION COUNT * 
AMAA ;SCOPE ENTRY POINT * 


PRRARAA AAA A AAAAAAAAAA AAAS A TATA A AAA AAA KA AAA A KAA AAA AAA AAA AA AKA THA eee 


;TEST THAT DONE BIT (RXCSR BIT 7) IS CLEARED BY READING RXBUF. 


ee ed 
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23 ee SET BY OUTPUTTING va te MAINTENANCE BIT SET (TXCSR BIT 2) 
24 010706 052777 000004 170170 BIS #B1T2,aTXCSR ;SET MAINTENANCE BIT (TXCSR BIT 2) 
25 010714 005977 170166 CLR aTXBUF LOA D TXBUF 
26 010720 105777 170154 AMAB: TSTB @RXCSR WAIT FOR DONE BIT TO SET. 
27 010724 100375 BPL AMAB 
28 010726 005777 170150 TST @RXBUF ;READ RXBUF TO CLEAR DONE BIT 
29 010732 105777 170142 TSTB8 @RXCSR ;SEE IF DONE BIT IS CLEAR 
30 010736 100001 BPL ;BRANCH IF DONE BIT IS CLEAR 
31 010740 104003 ERROR ;READING RXBUF FAILED TO CLEAR DONE BIT 
3 010742 104012 AMAC: SCOPE : SCOP E 
34 
35 PRRARARAEREA EERE EEE A EEA T TEAC A AAA AAA TARA ARATE AAA KAA eee eK eee AeA ATH 
36 010744 000057 ATS?: 57 ; TEST NUMBER 57 * 
37 010746 011032 AT60 ;ADDRESS OF NEXT TEST * 
38 010750 000012 10. ;TEST ITERATION COUNT * 
39 010752 010754 ANAA ;SCOPE ENTRY POINT * 
2240 PITITIIITI TTL ITI TILT I ITT TTT iTi tii tii iii iit iti titi iii titi irri iri 
2241 TEST THAT DONE BIT (RXCSR BIT 7) SETS NO LATER THAN 500 MSECS AFTER OUTPUTTING 
2242 > CHARACTER WITH MAINTENANCE BIT SET AND RECEIVE SPEED SET TO 01 (TRANSMIT 
2243 pace ALSO SET TO 01 
2244 010754 042777 000030 170122 BIC #30,aTXCSR ;SET MAINTENANCE BIT AND SET 
2245 010762 052777 000014 170114 BIS #14,aTXCSR :TX SPEED=01 
2246 010770 042777 000030 170102 BIC #30,aRXCSR SET RX SPEED =01 
2247 010776 052777 000010 170074 BIS #10,aRXCSR 
2248 011004 005077 170076 CLR aTXBUF ;LOAD TXB 
2249 011010 104016 DELAY ;DELAY 500. MSECS. 
2250 011012 000764 500. 
2251 011014 105777 170060 TSTB @RXCSR ;SEE IF DONE BIT IS SET. 
2252 011020 100401 BMI ANAB BRANCH IF DONE IS SET. 
2253 011022 104003 ERROR ;DONE FAILED TO SET + he RX SPEED=01. 
2254 011024 005777 170052 ANAB: TST aR XBUF ;CLEAR DONE BIT IF SET 
$522 011030 104012 SCOPE : SCOPE 
2257 RAR RAE RARER AAA AAA A TATA T ATER A AAA AAA AT ATTRA AAA EAA ATA Eee 
2258 011032 000060 AT60: 60 ; TEST NUMBER 60 * 
2259 011034 011120 AT61 sADDRESS OF NEXT TEST * 
2260 011036 000012 10. ;TEST ITERATION COUNT * 
2261 011040 011042 AOAA ;SCOPE ENTRY POINT * 
2262 PRARAAAAAAAAAAAAAAAA TATRA AAA AAT eA eA AeA AAA TAK AA KATA eee ete tee eee eeteereet 
2263 ‘TEST THAT DONE BIT (RXCSR BIT 7) SETS NO LATER THAN 400 MSECS AFTER OUTPUTING 
2264 CHARACTER WITH MAINTENANCE BIT SET AND RECEIVE SPEED SET TO 10 (TRANSMIT 
2265 : SPEED ALSO SET TO 10). 
2266 011042 042777 000030 170034 AOAA BIC #30, aTXCSR ;SET MAINTENANCE BIT AND SET 
2267 011050 052777 000024 170026 BIS #24 aTXCSR 7; TX SPEED=10. 
2268 011056 777 000030 170014 BIC #30, aRXCSR SET RX SPEED=10. 
2269 011064 052777 000020 170006 BIS #20,aRXCSR 
2270 011072 005077 170010 CLR aTxBut ;LOAD TXBUF 
2271 011076 104016 DELAY sDELAY 400 MSECS 
2272 011100 0 400. 
2273 011102 105777 167772 TSTB @RXCSR ;SEE IF DONE BIT IS SET. 
2274 011106 100401 BM] AOAB BRANCH IF DONE BIT IS SET. 
2275 011110 104003 ERROR sDONE FAILED TO SET WITH RX SPEED=10. 
2276 011112 005777 167764 AOAB: TST aR XBUF i CLEAR DONE BIT IF SET 
2277 011116 104012 SCOPE PE 


snecneceecencecceececeecercencentectnsencentecseenececceeceeneeneeneanes 
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2279 011120 000061 AT61: 61 ; TEST NUMBER 61 * 
2280 011122 011172 AT62 ;ADDRESS OF NEXT TEST * 
2281 011124 000012 10. ;TEST ITERATION COUNT * 
2282 011126 011130 APAA ;SCOPE ENTRY POINT ” 
2283 RRR eeeeeeReeeeeeeeeeeeeeeeeaeeeeneneeeeeeeeeeeeeeenereeneeterenetere 
2284 TEST THAT DONE BIT (RXCSR BIT 7) SETS NO LATER THAN 250 MSECS AFTER OUTPUTTING 
aH AMOS TO Tet BIT SET AND RECEIVE SPEED SET11 (TRANSMIT SPEED 
2287 011130 052777 000034 167746 APA BIS #34,aTXCSR ;SET MAINT BIT AND TX SPEED=11 
2288 011136 052777 000030 167734 BIS #30, aRXCSR ;SET RX SPEED=11 
2289 011144 005077 167736 CLR aTXBUF . ;LOAD TXBUF 
2290 011150 104016 DELAY sDELAY 250 MSECS. 
2291 011152 000372 250. 
2292 011154 105777 167720 TSTB @RXCSR ;SEE IF DONE BIT IS SET. 
2293 011160 100401 BM] APAB BRANCH IF DONE BIT IS SET 
2294 011162 104003 ERROR ;DONE FAILED TO SET WITH RX SPEED=11 
2295 011164 005777 167712 APAB: TST @RXBUF ;CLEAR DONE BIT IF SET. 
2296 011170 104012 SCOPE : SCOPE 
2297 
2298 
2299 PERRET ATTA A ATTA A AAA AAA TAA AAA AAA A KATA AA Kee eee AAA 
2300 011172 000062 AT62: 62 ; TEST NUMBER 62 * 
2301 011174 011474 AT63 ;ADDRESS OF NEXT TEST * 
2302 011176 000144 100. ;TEST ITERATION COUNT * 
2303 011200 011202 AQAA ;SCOPE ENTRY POINT t 


2304 PITITIIIT TTI TTTT TTT TTT T Tit titi ii iiii titi titi 


2305 :TEST THAT RECEIVE SPEEDS ARE ARRANGED IN ASCENDING ORDER BY oh chee THAT TIME 
2306 TELAPSED TO DONE BIT SETTING (RXCSR BIT 7) DECREASES AS A HIGHER SPEED 
2307 1S ~woe tg THE TRANSMIT SPEED SELECTED WILL 2 so ba TO THE SELECTED RECEIVE SPEED 
2308 011202 005067 170040 AQAA: CTRA ;CLEAR CTRA THROUGH CTR 

2309 011206 005067 170036 CLR CTRB ; (ELAPSED TIME COUNTERS) 

2310 011212 005067 170034 CLR CTRC 

2311 011216 005067 170032 CLR CTRD 

2312 011222 042777 000030 167654 BIC #30,aTXCSR ;SELECT TX SPEED 00 

2313 011230 052777 000004 167646 BIS #B1T2,aTXCSR ;SET MAINTENANCE BIT 

2314 011236 042777 000030 167634 BIC #30,aRXCSR ;SELECT RX SPEED 00 

2315 011244 004767 000154 JSR %7,AQAS OUTPUT CHARACTER AND TIME DONE BIT 
2316 011250 066767 000216 167770 ADD AQAST,CTRA ;ADD ELAPSED TIME TO CTRA 

2317 011256 042777 000030 167620 BIC #30,aTXCSR SELECT TX SPEED 01 

2318 011264 052777 000010 167612 BIS #10, aTXCSR 

2319 011272 Beene 000030 167600 BIC #30, aRXCSR ;SELECT RX SPEED 01. 

2320 011300 052777 000010 167572 BIS #10,aRXCSR 

2321 011306 004767 000112 JSR 17, AQAS ;OUTPUT CHARACTER oe fy DONE BIT 
2322 011312 066767 154 167730 ADD AQAST, CTRB ;ADD ELAPSED TIME TO CTRB 

2323 011320 042777 000030 167556 BIC #30,aTXCSR SELECT TX SPEED 10” 

2324 011326 052777 000020 167550 BIS #20,aTXCSR 

2325 011334 042777 000030 167536 BIC #30 ,aRXCSR :SELECT RX SPEED 10 

2326 011342 052777 000020 167530 BIS #20,aRXCSR 

2327 011350 004767 050 JSR 27, AQAS OUTPUT CHARACTER my TIME DONE BIT. 
2328 011354 066767 112 167670 ADD AQAST,CTRC ;ADD ELAPSED TIME TO CTRC. 

2329 811398 bog 00030 167514 BIS #30,aTXCSR :SELECT TX SPEED 11 

2330 0113 052777 30 167502 BIS #30, aRXCSR ;SELECT RX SPEED 11 

2331 011376 004767 000022 JSR 17, AQAS [OUTPUT CHARACTER AND TIME DONE BIT 
2332 011402 066767 000064 167644 ADD AQAST,CTRD ;ADD ELAPSED TIME TO CTR 

2333 011410 004767 ‘002720 JSR %7,CMPT SCHECK THAT CTRA THROUGH CTRD CONTAIN 
2334 011414 000402 BR AQAB :DESCENDING VALUES. 
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2335 011416 104015 ERROR1 s;RECEIVE SPEEDS NOT ARRANGED IN 
2336 011420 015730 ERXTIM + ASCEND ING ORDER. 
2337 011422 104012 AQAB: SCOPE SCOPE 
2338 011424 005067 000042 AQAS: CLR AQAST “CLEAR ELAPSED TIME COUNTER AQAST 
2339 011430 105777 167450 TSTB aTXCSR ‘WAIT FOR TX READY. 
2340 011434 100375 BPL 74 
2341 011436 104016 DELAY sWAIT 20 MSECS. 
2342 011440 000024 20. 
2343 011442 005777 167434 TST @RXBUF ; CLEAR Ao BIT IF SET 
2344 011446 005077 167434 CLR aTXBUF LOAD D TXBUF 
2345 011452 104016 AQASA: DELAY ;DELAY 1 MSEC 
2346 011454 000001 1 
2347 011456 005267 000010 INC AQAST s INCREMENT ELAPSED TIME COUNTER 
2348 011462 105777 167412 TSTB @RXCSR :DON NE SET? 
2349 011466 100371 BPL AQASA :BRANCH IF DONE NOT SET 
2350 011470 000207 RTS x7 x 
2351 011472 000000 AQAST: OPEN “ELAPSED TIME COUNTER 
33 
2354 PERRET AAA ARATE ETAT ATA T ERATE EAE AKER eT eee eee KA KK eee eee ee ee teeees 
2355 011474 000063 AT63: 63 ; TEST NUMBER 63 , 
2356 011476 011732 AT64 ;ADDRESS OF NEXT TES ® 
2357 011500 000144 100. sTEST ITERATION COUNT * 
2358 011502 011504 ARAA ;SCOPE ENTRY POINT * 
2359 RRA ARERR EEE E ETAT TATA AA KAKA TATA ATTA ARAAA HHA R eee e eee e eee et 
2360 STEST FOR CORRECT OPERATION OF CHARACTER LENGTH SELECTION DURING RECEIVE 
2361 :(RXCSR BITS 9 AND 10) BY CHECKING THAT TIME REQUIRED TO RECEIVE A CHARACTER 
$308 ils, Lan FOR Fe +h CODE THAN FOR 7 BIT CODE ETC. 
2363 011504 005067 167536 CLR :CLEAR CTRA THROUGH CTRD 
2364 011510 005067 167534 CLR TRB > (ELAPSED TIME COUNTERS) 
2365 011514 005067 167532 CLR CTRC 
2366 011520 005067 167530 CLR CTRD 
2367 011524 042777 003000 167346 BIC #3000,aRXCSR ;SET CHAR LENGTH TO . ree a — 
2368 011532 004767 000116 JSR 47, ARAS OUTPUT CHAR AND TIME D BIT 
2369 011536 066767 000166 167502 ADD ARAST,CTRA ;ADD ELAPSED TIME TO cTRA 
2370 011544 042777 003000 167326 BIC #3000 ,aRXCSR ;SET CHAR LENGTH TO 01 (7 BIT CODE) 
2371 011552 052777 001000 167320 BIS #1000 ,aRXCSR 
2372 011560 004767 000070 JSR %7,A ARAS ;OUTPUT CHAR AND TIME Ae BIT 
2373 011564 066767 000140 167456 ADD ARAST, CTRB ;ADD ELAPSED TIME TO C 
2374 011572 042777 003000 167300 BIC #3000 ,aRXCSR ;SET CHAR LENGTH TO 16. ‘e BIT CODE) 
2375 011600 052777 002000 167272 BIS #2000, aRXCSR 
2376 011606 4767 000042 JSR %7,ARAS ;OUTPUT CHAR AND TIME eke BIT 
2377 011612 066767 000112 167432 ADD ARAST,CTRC ;ADD ELAPSED TIME TO C 
2378 011620 052777 003000 167252 BIS #3000 ,aRXCSR ;SET CHAR LENGTH TO 11 ms BIT CODE) 
2379 011626 004767 000022 JSR %7,ARAS ‘OUTPUT CHAR AND TIME DONE BIT 
2380 011632 066767 000072 167414 ADD ARAST, CTRD ADD ELAPSED TIME TO CTRD 
2381 011640 004767 002470 JSR %7,CMPT ;CHECK THAT CTRA Loge s ape CTRD 
2382 011644 000402 BR ARAB ; CONTAIN DESCENDING VALUES 
2383 011646 104015 ERROR1 :RECEIVE CHARACTER LENGTHS NOT ARRANGED 
2384 011650 015772 ERCLGT : IN DESCENDING ORDER 
2385 011652 104012 ARAB: SCOPE SCOP E 
2386 011654 005067 000050 ARAS: CLR ARAST ;CLEAR ELAPSED Hh ay COUNTER ARAST 
2387 011660 105777 167220 TSTB aTXCsR “WAIT FOR TX READY 
2388 011664 100375 BPL 74 
2389 011666 104016 DELAY WAIT 20 MSECS. 
2390 011670 000024 20. 





— 
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2391 011672 
2392 011676 
2393 011704 
2394 

2395 011710 
2396 011712 
2397 011714 
2398 011720 
2399 011724 
2400 011726 
2401 011730 
2402 

2403 

2404 

2405 011732 
2406 011734 
2407 011736 
2408 011740 
2409 

2410 

2411 011742 
2412 011746 
2413 011752 
2414 011760 
2415 011766 
2416 011770 
2417 011772 
2418 011774 
2419 012000 
2420 012002 
2421 

2422 012004 
2423 012006 
2424 

2425 012014 
2426 012016 
2427 

2428 012020 
2429 012024 
2430 012026 
2431 012034 
2432 012040 
2433 012042 
2434 012044 
2435 

2436 

2437 012046 
2438 012050 
2439 012052 
2440 012054 
2441 

2442 

2443 

2444 012056 
2445 012062 
2446 012 


cv11 peas 
10-JUN-80 


005777 
052777 
005077 


104016 


000000 


000064 


011742 


004767 


104003 


000405 
032777 


001401 
104003 


005777 


012066 


004767 
104007 
012114 
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47 


000060 


010000 


167260 


010000 


167056 


000004 
167046 


170550 


167200 


167300 
167272 


167064 


167050 
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TST @RXBUF ;CLEAR DONE BIT IF SET 
BIS #BIT2,aTXCSR SET MAINTENANCE BIT 
CLR aT XBuUF LOAD TXBUF 
ARASA: ‘we ;DELAY 1 MSEC. 
INC ARAST ; INCREMENT ELAPSED TIME A cstotecas 
TSTB @RXCSR SEE IF DONE DIT IS SET 
BPL ARASA BRANCH IF NOT SET 
RTS 47 EXIT 
ARAST: OPEN ;ELAPSED TIME COUNTER 
RRR RRR RRA RATER R ETE RATE EATHERAAA ERRATA TARR ARTA e eee e ETA TA TATE 
AT64: 64 ; TEST NUMBER 64 e 
AT65 ;ADDRESS OF NEXT TEST * 
100. : TEST ITERATION COUNT * 
ASAA ;SCOPE ENTRY POINT « 


Rests three ee teeeantre a nies cee Gre anced Ree ear er cae 
TEST CORRECT OPERATION OF DATA OVERRUN BIT (RXCSR BIT 12) 
ASAA: JSR %7,ASAS OUTPUT CHARACTER AND WAIT 200 MSECS 

JSR %7,ASAS [OUTPUT CHARACTER AND WAIT 200 MSECS 

MOV @RXCSR,RXCSRT ;SAVE RXCSR CONTENTS 

BIT WBITIZ2.RXCSRT  :SEE IF DATA oe aT WAS SET 


BNE ASAB ;BRANCH IF BIT WAS 
ERROR 
BR ASAD 
ASAB: TST RXCSRT ;SEE IF ERROR BIT WAS SET (RXCSR BIT 15) 


BM! ASAC 
ERROR ERROR BIT FAILED TO SET 
;WHEN DATA OVERRUN SET 


ASAD 
ASAC: BIT WBIT12,aRXCSR  ;SEE IF DATA OVERRUN WAS 
;CLEARED WHEN RXCSR WAS READ 
BEQ ASAD ;BRANCH IF CLEAR 
ERROR ;READING RXCSR A 
;TO CLEAR DATA OVERRU 


ASAD: TST @RXBUF :CLEAR DONE BIT (RXCSR BIT 7) 
SCOPE ; SCOPE 
ASAS: BIS #BIT2,aTXCSR tf “as BIT 
CLR aTXBUF ;LOAD T 
DELAY DELAY 200. MSECS 
200. 
RTS x7 sEXIT 
V9? Saar * yeti ® Rion? ArH” wk iaeseataiveaman anime 
AT65: 65 i TEST NUMBER 65 * 
AT66 ;ADDRESS OF NEXT TEST * 
10. :TEST ITERATION COUNT * 
ATAA [SCOPE ENTRY POINT * 
eee eeeeeeeeeeeee eee ae ee ee eee eeeekeeeneteeetenenreeeeeeeeereneererereees 
[TEST THAT TRANSMITTER IS ABLE TO INTERRUPT. IF THE INTERRUPT IS SERVICED, 
IT WILL HAVE OCCURRED AT THE CORRECT VECTOR. 
JSR ,OVRLAY :GO TO OVER LAY ROUTINE 
STTXV :SET is B INTERRUPT SERVICE 
ATAC :TO ATA 


SEQ 0044 
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2447 012066 042777 
2448 012074 005067 
2449 012100 052777 
2450 012106 00024 

2451 012110 104003 
2452 012112 104012 
2453 012114 022626 
2454 012116 000775 
2455 

2456 

2457 

2458 

2459 012120 000066 
2460 012122 012176 
2461 012124 001750 
2462 012126 012134 
2463 

2464 

2465 

2466 012130 104007 
2467 012132 012166 
2468 012134 016767 
2469 012142 042777 
2470 012150 052777 
2471 012156 000240 
2472 

2473 

2474 012160 042777 
2475 012166 104012 
2476 012170 022626 
2477 012172 104003 
2478 012174 000774 
2479 

2480 

2481 2176 000067 


2485 
2486 
2487 
2488 012206 104007 
2489 012210 012250 
2490 012212 042777 
2491 012220 616767 
2492 012226 162767 
2493 012234 052777 
2496 012242 240 
2495 012244 104003 
2496 012246 01 
2497 012250 022626 
2498 012252 042777 
6:2260 104012 





Slit 
747 


000100 
16567 
000104 


166756 
000100 
000104 


000100 


000100 


000104 


000100 


167010 
166776 


166716 


166624 
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ATAA: BIC #BIT6,aTXCSR ;DISABLE TX INTERRUPT 
CLR PSW ;SET PROCESSOR PRIORITY TO 0 
ans #104 ,aTXCSR ‘ENABLE TX INTERRUPT 
ERROR ;READY DID NOT CAUSE AN INTERRUPT 
ATAB: SCOPE : SCOPE 
ATAC: POPSP2 sHERE IF INTERRUPT IS SERVICED. POP 
BR ATAB ;THE STOCK TWICE 


eke ae eae Seeek Pedeeh BA or ae oe 


AT66: 66 ;TEST NUMBER 66 * 
AT67 SADDRESS OF NEXT TEST * 
1000. TEST ITERATION COUNT * 
AUAA :SCOPE ENTRY POINT * 


PARRA RARE AERA TAA TERE RATA TATA HEATH AAAAA TAREE eK Tee A eee eK Tete eee 
; TEST THAT READY DOES NOT CAUSE AN INTERRUPT WHEN THE PROCESSOR IS 
TAT THE ee Papen AS THE TRANSMITTER INTERRUPT REQUEST LEVEL 

STT ;SET TX INTERRUPT SERVICE TO 


A ‘ 
AUAA: MOV ~ TXLVL,PSW SET PROCESSOR PRIORITY SAME AS TX PRIORITY 
BIC #B1T6,aTXCSR ;DISABLE TX INTERRUPTS 
BIS #104,aTXCSR ;ENABLE TX INTERRUPTS 


AUAB: = BIC #BIT6,aTXCSR :OK IF NO INTERRUPT OCCURS. DISABLE INTERRUPTS 
AUAC: SCOPE ; SCOPE 


POPSP2 :HERE IF INTERRUPT OCCURS. POP STOCK TWICE 
ERROR ' ;TX INTERRUPTED WITH PROCESSOR AT SAME 
BR AUAC :PRIORITY AS THE TRANSMITTER 
RRA RER RRA REC AA RETA ETAT ATTA EATER AAA T ATTRA AAA RATA eee A ATTA Tee 
AT67: 67 TEST NUMBER 67 
0 ADDRESS OF NEXT TEST 


a 2@ 


° TEST ITERATION COUNT 
AVAA ;SCOPE ENTRY POINT 
eeTII Titi iii titi iti tii ri ititiiitiiiiiiirii iii rr irri rrr ira, 
TEST THAT TRANSMITTER INTERRUPTS WHEN Le IS AT PRIORITY ONE LEVEL 
[LOWER THAN THE TRANSMITTER INTFRRUPT PRIORITY 
Ss SET TX INTERRUPT SERVICE TO AVAB 


TTXV 

AVAB 
AVAA: = BIC #B1T6,aTXCSR DISABLE TX INTERRUPTS 

MOV TXLVL ,PSW ;SET PROCESSOR PRIORITY TO ONE LEVEL 

SUB #40,PSW ;LOWER THAN TX PRIORITY 

ass #104 ,aTXCSR ENABLE TX INTERRUPTS 

N 

ERROR ;TX FAILED TO INTERRUPT 

BR AVAC 
AVAB:  POPSP2 sHERE IF INTERRUPT OCCURS. POP STOCK TWICE 
AVAC: ait #BIT6,aTXCSR a TX INTERRUPTS 


SEQ 0045 


| 
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felelelelelelelelejlejlelelelelelelo) 
kk a kd td oh oh od od 
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000070 


012272 


104007 


000761 
000071 


012404 


004767 
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012432 
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FERRARA RAE EE RATE EEE T AREA ATE AARAAAREEE RARER AATEEREAA AEE RE AE AKETE REE 


AT70: 70 ; TEST NUMBER 70 * 
AT71 :ADDRESS OF NEXT TEST : 
100. :TEST ITERATION COUNT * 
AWAA ;SCOPE ENTRY POINT * 


PSII IIIT Titi titi tii iiiiitiitititiviiiiiiiitiiiiiiirii rire errr 
;TEST THAT TRANSMITTER DOES NOT REINTERRUPT AFTER THE INITIAL INTERRUPT HAS 
ht pats Fon HAS BEEN SERVICED. 


MI. :SET TX INTERRUPT SERVICE TO AWAC 
BIC #BIT6,aTXCSR :DISABLE TX INTERRUPTS 
CLR PSwW SET PROCESSOR PRIORITY TO 0 
SIs #104,aTXCSR sENABLE TX INTERRUPTS 
ERROR ; TRANSMITTER FAILED TO INTERRUPT 
AWAB: BIC #BIT6,aTXCSR sDISABLE TX INTERRUPTS 


; SCOPE 
AWAC: MOV WAWAE ,ATXVTR sHERE IF INTERRUPT OCCURS. CHANGE EXIT 
MOV #AWAD ,a%6 ;POINTER TO AWAD AND EXIT INTERRUPT 


RTI 
AWAD: NOP :OK IF NO INTERRUPT REOCCURS. 
BR AWAB 
AWAE: POPSP2 ;HERE IF INTERRUPT REOCCURS 
ERROR TX REINTERRUPTED AFTER RTI 
BR AWAB 
UT TTI III iti iti ii itil iii rrr rrr rrr 
AT71: 71 ; TEST NUMBER 71 * 
AT72 ADDRESS OF NEXT TEST * 
10. TEST ITERATION COUNT * 
AXAA ;SCOPE ENTRY POINT * 


IPT I Iti titi iit iit iiiiiitii tility 
TEST THAT RECEIVER DONE BIT IS ABLE TO INTERRUPT. IF THE INTERRUPT IS 
7SERVICED IT WILL HAVE OCCURRED AT THE CORRECT VECTOR. 

JSR 7,OVRLAY ;GO TO OVERLAY ROUTINE 

STRXV ;SET RX INTERRUPT SERIVCE TO AXAB 


JSR %7,STRXD ;SET RX DONE BIT 
AXAA: = BIC #B1T6,aRXCSR DISABLE RX INTERRUPTS 
$s ;SET PROCESSOR PRIORITY TO 0 


PSW : 
ah #BIT6,aRXCSR ENABLE RX INTERRUPTS 
ERROR RX FAILED TO INTERRUPT 
BR AXAC 
AXAB: POPSP2 HERE IF INTERRUPT OCCURS 
AXAC: SCOPE ; SCOPE 
PRReReR eee eeeeeeee Kee Ae ee TAH KATA AAA ee AAA e AeA A Hee AeHTAAe Ker eeeKeTee ee 
AT72: 72 ;TEST NUMBER 72 * 
AT73 ADDRESS OF NEXT TEST * 
1000. ; TEST ITERATION COUNT * 
AYAA ;SCOPE ENTRY POINT * 


RRARARAAARHERAAAEAAAAAAT AAA AAAARARARERAAAEAAETAAAAAEAAAAeAeA eRe ee Ae 


TEST THAT RECEIVER DONE BIT DOES NOT CAUSE AN INTERRUPT WHEN THE PROCESSOR 


SEQ 0046 
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2559 
2560 012446 104006 
2561 012450 012512 
2562 012452 004767 
2563 012456 042777 
2564 012464 016767 
2565 012472 052777 
2566 012500 000240 
2567 012502 042777 
2568 012510 104012 
2569 012512 022626 
2570 012514 104003 
2571 012516 000771 
2572 
2573 
2574 012520 000073 
2575 012522 012610 
2576 012524 000012 
2577 012526 012540 
2578 
2579 
2580 
2581 012530 104006 
2582 012532 012576 
2583 012534 4767 
2584 012540 042777 
2585 012546 016767 
2586 015238 162767 
2587 012562 052777 
2588 012570 000240 
2589 012572 104003 
Soay 012574 000401 
2592 012576 022626 
2593 012600 042777 
2594 012606 104012 
2595 
2596 
2597 
2598 000074 
2599 012706 
0144 
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10:47 


001636 


000100 
000100 


001554 


000100 


000100 


001470 


000100 
000100 


000100 
012700 


166272 


166242 
1662 34 


166222 
166222 


10: 


-_ 
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SEQ 0047 
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:1S AT '% —" PRIORITY LEVEL AS THE RECEIVER INTERRUPT REQUEST LEVEL 

Rene ;SET RX INTERRUPT SERVICE TO AYAC 
JSR %7,STRXD + SET RX DONE BIT 

AYAA: = BIC #B1T6,aRXCSR DISABLE RX INTERRUPTS 
MOV . RXLVL,PSW SET PROCESSOR adhd SAME AS RECEIVER'S 
ean #B1T6,aRXCSR ;ENABLE RX INTERRUPTS 

AYAB: Rite #B1T6,aRXCSR Or be NO INTERRUPT. DISABLE RX INTERRUPTS 

AYAC: POPSP2 THERE IF INTERRUPT OCCURS. POP STOCK TWICE 
ERROR ;RX INTERRUPTED WITH PROCESOR AT SAME 
BR AYAB ;PRIORITY AS THE RECEIVER 

FRR AR EERE EATER A EEA E AAA EAAAAAARERAAAARTARKAARARARKER EEE 

AT73: 73 ; TEST NUMBER 73 * 
AT74 ;ADDRESS OF NEXT TEST * 
10. ;TEST ITERATION COUNT * 
AZAA ;SCOPE ENTRY POINT * 


ITI itt titi iii iiitiitiititigitiiiitiiitili iii irri rere rere ry 
TEST THAT RECEIVER DONE BIT CAUSES INTERRUPT WHEN PROCESSOR IS AT PRIORITY 
; ONE at LOWER THAN THE RECEIVER'S INTERRUPT REQUEST LEVEL 


ty ;SET RX INTERRUPT TO AZAB 
JSR %7,STRXD ;SET RX DONE BIT 
AZAA: BIC #BIT6,aRXCSR ;DISABLE RX INTERRUPTS 
MOV RXLVL ,PSW ;SET PROCESSOR PRIORITY ONE LEVEL 
SUB #40,PSW LOWER THAN RECEIVER'S PRIORITY 
4 #B1T6,aRXCSR ;ENABLE RX INTERRUPTS 
ERROR ;RX FAILED TO INTERRUPT WITH PROCESSOR AT 
BR AZAC :PRIORITY ONE LEVEL LOWER THAN RECEIVER'S 
AZAB:  POPSP2 HERE IF INTERRUPT OCCURS 
AZAC: BIC #B1T6,aRXCSR ;DISABLE RX INTERRUPTS 
SCOPE ; SCOPE 
PURER RAE ATER E AAA EAA AAA A TEAR AAAAATHAAAARHERAARARERAAA HAAR A AKER AT 
AT74: 74 ;TEST NUMBER 74 * 
A175 ;ADDRESS OF NEXT TEST * 
100. :TEST ITERATION COUNT « 
AABA ;SCOPE ENTRY POINT * 


eReeeeeeeeeeeeeeeeeeeeee eee ee eeKeAeeeeeeeteeeeeeeeeeeAeseeAeeereneee 
;TEST THAT RECEIVER DOES NOT INTERRUPT AFTER THE INITIAL INTERRUPT HAS 
OCCURED AND DONE BIT HAS NOT BEEN CLEARED 

JSR 47, STRXD SET RX DONE BIT 
AABA: STRXV :SET RX INTERRUPT SERVICE TO AABC 


BIC #B1T6,aRXCSR DISABLE RX INTERRUPTS 
BIS #B1T6,aRXCSR s;ENABLE RX INTERRUPTS 


NOP 
ERROR ;RX FAILED TO INTERRUPT 
AABB : ot. #B1T6,aRXCSR :DISABLE RX INTERRUPTS 


OPE 
AABC: MOV WAABE ,ARKVTR ‘HERE IF INTERRUPT OCCURS. CHANGE SERVICE TO 
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2615 012666 012716 012674 MOV #AABD ,A%6 ;AABE, SET EXIT POINTER TO AABD 

2616 012672 000002 RTI sEXIT INTERRUPT SERVICE 

2617 012674 000240 AABD: NOP ;0K IF NO INTERRUPT REOCCURS 

2618 012676 000764 BR AABB 

2619 012700 022626 AABE : POPSP2 sHERE IF INTERRUPT REOCCURS 

2620 012702 104003 ERROR ;RX REINTERRUPTED AFTER RTI 

soe} 012704 000761 BR AABB 

2623 RRR RRA REE REEEERREE EEE ERE EERE REAR EAA ERERARERE RARE 
2624 012706 000075 AT7S: 75 ; TEST NUMBER 75 * 
2625 012710 012762 AT76 S ADDRESS OF NEXT TEST * 
2626 012712 000144 100. TEST ITERATION COUNT * 
2627 012714 012716 ABBA ;SCOPE ENTRY POINT * 
2628 PRRAAAARARAA AERA A ETAT AAA E TARA ETAT e TARA Keeeee Hee eee K ete eee 
2629 ; TEST THAT DATA OVERRUN (RXCSR BIT 12) CLEARS THE DONE BIT (RXCSR BIT 7) 
2630 012716 004767 001372. . ABBA: JSR %7,STRXD ;SET RX BONE BIT 

2631 012722 005077 166160 CLR aT XBuF ;LOAD TXBUF 

2632 012726 104016 DELAY ;WAIT 20 MSECS. 

2633 012730 000024 20. 

2634 012732 017767 166142 166320 MOV ARXCSR,RXCSRT ;SAVE CONTENT OF RXCSR 

2635 012740 105777 166134 TSTB @RXCSR ;SEE IF DONE BIT IS CLEAR 

2636 012744 100001 BPL ABBB ;BRANCH IF DONE BIT iS CLEAR 

2637 012746 104003 ERROR 

2638 012750 104016 ABBB: DELAY sWAIT FOR RX DONE TO SET. 

2639 012752 000310 200. 

2640 012754 005777 166122 TST aR XBUF ;CLEAR DONE BIT IF SET 

2641 012760 104012 SCOPE SCOPE 

gohe 

264 

2644 

2645 OPERA AAAAASESERERASERERERARAEEAEEAEEESELERERAL ELAS ERASER RRA REESE RRA RASS OY 
2646 012762 000076 AT76: 76 ; TEST NUMBER 76 * 
2647 012764 013040 A177 “ADDRESS OF NEXT TEST * 
2648 012766 000144 100. : TEST ITERATION COUNT * 
649 012770 012776 ACBA ;SCOPE ENTRY POINT * 
2650 RRA AAA AA AAA AAA ATTA TAREE TET TAA TAA KAA AAA A RAK AeA KAA RATA AeA TAA Eee 
2651 :TEST THAT ERROR BIT (RXCSR BIT 15) IS ABLE TO CAUSE AN INTERRUPT 

2652 012772 104006 STRXV ;SET RX INTERRUPT SERVICE TO ACBB. 

2653 012774 013034 ACBB 

2654 012776 004767 001312 ACBA: JSR ops Teme ;SET RX DONE BIT 

2655 013002 004767 001306 JSR %7,STRXD ;SET RX DATA OFLOW 

2656 013006 042777 000100 166064 BIC #BiT6, @RXCSR ;DISABLE RX INTERRUPTS 

2657 013014 005067 164756 CLR PSW ;SET PROCESSOR PRIORITY TO 0 

2658 013020 052777 000100 166052 BIS #B1T6,aRXCSR ENABLE RX INTERRUPTS 

2659 013026 000240 NOP 

2660 013030 104003 ERROR RX ERROR BIT FAILED TO CAUSE INTERRUPT 
2661 013032 000401 BR ACBC 

2662 013034 022626 ACBB: POPSP2 sHERE IF INTERRUPT OCCURS. POP STOCK TWICE 
2663 013036 104012 ACBC: SCOPE ; SCOPE 

2664 

2665 

2666 

2667 peReeeeeeeeeeeee treet ee tdeeeeeeedteeeteedeeetedeeeeerererererereererees 
2668 013040 000077 Al7?: 77 ; TEST NUMBER 77 

2669 013042 013222 AT100 sADDRESS OF NEXT TEST 

2670 013044 000144 100. ; TEST ITERATION COUNT 


— | 
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2671 013046 013062 ANBB ;SCOPE ENTRY POINT 
2672 FRRAAAAAAAAA AAA AAA AA EAEEKEERERAKAAARAAAAKAAKAARA RRA RA ATK ARK eA ee 
2673 jTEST THAT PARITY aie OPERATES CORRECT. 
2674 013050 004567 170052 ANBA JSR | s INITIALIZE BINARY — PATTERN 
2675 013054 052777 000004 166022 BIS mite, STXCSR ‘SET MAINTENANCE BIT 
2676 013062 112767 000144 166156 ANBB: MOVB #100. "CTRA GET CHARACTER COUNT 
2677 013070 112767 000010 166151 ANBC: MOVB #8.,CTRA+1 ‘GET CHARACTER BIT COUNT 
2678 013076 004567 170130 JSR 5,GTBINP :GET A CHARACTER (IN R1) 
2679 013102 105777 165776 TSTB aTXxcsr sWAIT FOR 
2680 013106 100375 BPL “4 : TRANSMITTER READY FLAG 
2681 013110 010177 165772 MOV i ,aTXBUF “LOAD SRROnE T TER BUFFER 
2682 013114 105777 165760 TSTB ARKCSR sWAIT FOR 
2683 013120 100375 BPL “4 RECEIVER READY FLAG 
2684 013122 017767 165754 166102 MOV @RXBUF,CRBUFA :GET RECEIVED CHARACTER 
2685 013130 005000 CLR x0 ‘CLEAR WORKING REGISTER 
2686 013132 006067 166074 ANBD: ROR CRBUFA ‘LOOK AT CHARACTER BITS 
2687 013136 103001 BCC +4 AND COMPLEMENT RO WHEN 
2688 013140 005100 COM x0 3A 118 REC IVED 
2689 013142 105367 166101 DECB CTRA+1 s1F RO=1'S, ODD#1'S RECEIVED 
2690 013146 001371 BNE ANBD sI1F RO=0'S, EVEN #1'S RECEIVED 
2691 013150 032777 000040 165722 BIT #BITS,aRXCSR ‘TEST PARITY INDICATOR 
2692 013156 001403 BEQ ANBE ‘BRANCH IF INDICATES EVEN 
2693 013160 005700 TST x0 : TEST RECEIVED PARITY (IN RO) 
2694 013162 001403 BEQ ANBF “ERROR —— 
2695 013164 000412 BR ANBG 370K BRA 
2696 013166 005700 ANBE: TST x0 s TEST RECEIVED PARITY (IN RO) 
2697 013170 001410 BEQ ANBG OK BRA 
2698 013172 104003 ANBF : ERROR YPE “a 
2699 013174 004567 170100 JSR 5 ,OACNV ‘60 TO OCTAL 
2700 013200 001232 CRBUF A :T0 ASCII 
2701 013202 016424 AWAS sROUTINE AND 
2702 013204 000003 3 sCONVERT DATA 
2703 013206 104015 ERROR1 : TYPE 
2706 013210 016424 AWAS sDATA 
2705 013212 105367 166030 ANBG:  DECB CTRA :DECREMENT CHARACTER COUNT 
2706 013216 001324 BNE ANBC 
2707 013220 104012 SCOPE 
2708 000077 X=77 
709 000000 Y=0 
2710 een bee eet ee eke eae ee ee eee 
2711 013222 000100 AT100: 100 sROUTINE #100 e 
2712 013224 013240 AT101 ‘ADDRESS OF NEXT TEST * 
2713 013226 000003 a s 1TERATION COUNT * 
2714 013230 013232 DATO sSCOPE ENTRY POINT . 
2715 000100 X=X+1 
2716 oe tee cater 71 eae Reneesteee Bh tee EE fic ee ro 
2717 013232 004567 170274 DATO: JSR 5, DATTST LOAD PARAMETERS & RUN TEST 
2718 013236 000000 0 :SEE NOTE 0 FOR DATA TEST PARAMETERS 
2719 000001 Y=Y+1 
2720 PRRACAK AAA KAAAAAAATAAAA ALAA A AAA HATA AAA KAKA eee eee AeeKteKeKeteeKeeKtererererteesees 
2721 013240 000101 AT101: 101 ;ROUTINE #101 * 
2722 «4013242 013256 AT102 ADDRESS OF NEXT TEST * 
2723 013244 000003 3. ; ITERATION COUNT * 
2724 013246 013250 DAT1 ;SCOPE ENTRY POINT * 
2725 000101 K=X+1 
2726 PUR eReeeeAKAeeeeeeeteeeeeeteereeeteneeeeeeeekeeeeeeeeeereeeteeeAtingettieeeeeers 


—ds 


saree oessinnassenninennensharttiennepanviigiasesdasetesiemeatinaitiiei wn 
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2727 013250 004567 170256 DAT1: JSR 5, DATTST ;LOAD Ange gh iyy & RUN TEST 
2728 013254 000001 1 ;SEE NOTE 1 FOR DATA TEST PARAMETERS 
2729 000002 Y=Y+1 
2730 PRRRA RARER AATEC TATE TET T THRE T AAA AA ATH eA TARA ee KA TT eHA AeA te Ate tHe TAT Tee 
2731 013256 000102 AT102: 102 ROUTINE #102 * 
2732 013260 013274 AT103 ADDRESS OF NEXT TEST * 
2733 013262 000003 3. ; ITERATION COUNT * 
2734 013264 013266 DAT2 :SCOPE ENTRY POINT * 
2735 000102 X=X+1 
2736 eee ee ene Cone oe Ceres ae eee ee 
2737 013266 004567 170240 DAT2: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
2738 013272 000002 2 : SEE NOTE 2 FOR DATA TEST PARAMETERS 
2739 000003 Y=Y+1 
2740 PRR RAAT AAA TET A EATER THAR AAA ATA AREA A ATK A eee eee Kee AAA Tee ETAT 
2741 013274 000103 AT103: 103 ;ROUTINE #103 * 
2742 013276 013312 AT104 “ADDRESS OF NEXT TEST * 
2743 013300 000003 3. ; ITERATION COUNT * 
2744 013302 013304 DAT3 sSCOPE ENTRY POINT * 
2745 000103 X=X+1 
2746 ee ee a ee ne eee eee Sea me ee 
2747 013304 004567 170222 DATS: JSR 5,DATTST sLOAD PARAMETERS & RUN TEST 
2748 013310 000003 3 7SEE NOTE 3 FOR DATA TEST PARAMETERS 
2749 000004 Y=Y+1 
2750 Pee RARER RAAT ERATE TATA TATE TEE ARATE TATA T TAKA KARA TATA TATE Kee TET 
2751 013312 000104 AT104: 104 sROUTINE #104 a 
2752 013314 013330 AT105 sADDRESS OF NEXT TEST * 
2753 013316 000003 3. ; ITERATION COUNT * 
2754 013320 013322 DAT4 ;SCOPE ENTRY POINT * 
2755 060104 X=X+1 
2756 ‘ne tage lutat YS ppc tn ec a lla eatin 
2757 013322 004567 170204 DAT4: JSR 5,DATTST :LOAD PARAMETERS & RUN TEST 
2758 013326 000004 4 sSEE NOTE 4 FOR DATA TEST PARAMETERS 
2759 000005 Y=Y+1 
2760 Peer errr Terre eT err errerrrererrrrrrerrerrerrerrrrerrrrriri iti titi titi tii tit 
2761 013330 000105 AT105: 19 ;ROUTINE #105 * 
2762 013332 013346 AT106 “ADDRESS OF NEXT TEST * 
2763 013334 000003 3. ; 1TERATION COUNT * 
2764 013336 013340 DATS : SCOPE ENTRY POINT * 
2765 000105 X=X+1 
2766 gig eet 9a enya yr aha gains / tliat 
2767 013340 004567 170166 DATS: JSR 5,DATTST :LOAD PARAMETERS & RUN TEST 
2768 013344 000005 5 >SEE NOTE 5 FOR DATA TEST PARAMETERS 
2769 000006 Y=Y+1 
2770 |Cage ~~ eres dpsieinetdeitamitesnage nent talaga cine antiiret 
2771 013346 000106 AT106: 106 sROUTINE #106 * 
2772 013350 013364 AT107 ADDRESS OF oral TEST * 
2773 013352 000003 a ; ITERATION COU * 
2774 013354 013356 DAT6 : SCOPE ENTRY BOINT * 
2775 000106 X=X+1 
2776 Rater IO ap / spear maging en laa namin 
2777 =013356 004567 170150 DATO: JSR 5, DATTST sLOAD PARAMETERS & RUN TEST 
2778 013362 000006 6 ;SEE NOTE 6 FOR DATA TES? PARAMETERS 
2779 000007 Y=Y+1 
2780 PURRARARAA AAA AKAAAAK AAA eee Lee eee AeA eee eee eee tere AeA ee erereereteeree rere eees 
2781 013364 000107 AT107: 107 ;ROUTINE #107 : 
2782 013366 013402 AT110 sADDRESS OF NEXT TEST * 
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ae : ITERATION COUNT * 
anh ;SCOPE ENTRY POINT * 
=X+ 
i. a tote. tt amnion re 
DAT7?: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
a vei ;SEE NOTE 7 FOR DATA TEST PARAMETERS 
ao 
FRRA RR RER ERER EAE ERA E AERA AA AAERAAAEEAAAEE REAR AA EAHA RATHER AERA EE 
AT110: 110 ROUTINE #110 * 
2T111 ADDRESS OF NEXT TEST * 
° ; ITERATION COUNT * 
wreak ;SCOPE ENTRY POINT * 
=X+ 
a - tut nm a<€—taAet °!|U0U!UC 
DAT10: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
ao , ;SEE NOTE 10 FOR DATA TEST PARAMETERS 
=V+ 
SRR RRA A EAA A REAR E EAE AERA EAE R AEA A RARER AAA AA AAHE AHA AR ETE 
AT111: 111 ROUTINE #111 * 
AT112 ;ADDRESS OF NEXT TEST * 
. : ITERATION COUNT * 
wd ;SCOPE ENTRY POINT * 
=X+ 
eke ate READER | heen Cane hon eae. ee: 
DAT11: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
11 ' ;SEE NOTE 11 FOR DATA TEST PARAMETERS 
Y=Y+ 


RRR AAEE TEE EAE AAA AARERAEAAAEAARAEAAAERAAEAAAAAEARRARERAAAKERAAAAAEEE 


AT112: 112 sROUTINE #112 * 
AT113 sADDRESS OF NEXT TEST » 
a s ITERATION COUNT * 
DATI2 :SCOPE ENTRY POINT * 
=X+ 
ete? a ts eae on ken Genet & ae ee 
DAT12: JSR 5 ,DATTST :LOAD PARAMETERS & RUN TEST 
V2 :SEE NOTE 12 FOR DATA TEST PARAMETERS 
Y-Y+ 
SRR ARERR ARATE TERA A AAA EA AAA AE AAA E ARATE RARER RARER RAK AERA AREER ES 
AT113: 113 sROUTINE #113 . 
AT114 sADDRESS OF NEXT TEST * 
3. s ITERATION COUNT * 
DATI3 :SCOPE ENTRY POINT . 
=X+ 
on ce aaah ot eee Reon & on AE as, 2 ae 
DAT13: JSR 5 DATTST :LOAD PARAMETERS & RUN TEST 
V3 ' :SEE NOTE 13 FOR DATA TEST PARAMETERS 
Y=V+e 
PRAREAAARERA AAA ARA AAA AAA AREA AAA AA AAA AERA AAR KATA AAA AAA ATA K AERA AKA KK AAA 
AT114: 1164 sROUTINE #114 * 
AT115 sADDRESS OF NEXT TEST x 
3. s ITERATION COUNT « 
paris sSCOPE ENTRY POINT x 
=X+ 
ea oe aca noe Reeeees he tee Sees eae ase 
DAT14: JSR 5, DATTST sLOAD PARAMETERS & RUN TEST 
14 *SEE NOTE 14 FOR DATA TEST PARAMETERS 


SEQ 0051 
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2839 000015 Y=Y+1 
2840 PRRAAAAEATAAA AAA TE EH ETAT TAA TATA A AAA AA HHA A AAT e eee Ke Keeeeteteteeereerenerereeet 
841 013510 000115 AT115: 115 sROUTINE #115 * 
2842 013512 013526 AT116 ’ sADDRESS OF NEXT TEST * 
2843 013514 000003 3. ; ITERATION COUNT * 
2844 013516 013520 DAT15 ;SCOPE ENTRY POINT * 
2845 000115 X=X+1 
2846 at ian ch aaatak ct cates Reieereeet & tom WO cae ee 
2847 013520 004567 170006 DATIS: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
2848 013524 000015 15 ;SEE NOTE 15 FOR DATA TEST PARAMETERS 
2849 000016 y=Y+1 
2850 PRR AR ARE AAAE RAAT ETA ATTA ATTA TATA TAA KA AACA AA eKAAeKeKeetetteeeeeeKe treet eee 
2851 013526 000116 AT116: 116 ;ROUTINE #116 * 
2852 013530 013544 AT117 ;ADDRESS OF NEXT TEST * 
2853 013532 000003 3. ; 1TERATION COUNT * 
2854 013534 013536 DAT16 ;SCOPE ENTRY POINT * 
2855 000116 X=X+1 
2856 PRARARAAEAAAAARE AAA A AAA TALE TAA T TAKA TAHA ATA AAAA KATH eee ete KeAee tee Kt eeee ter eees 
2857 013536 004567 167770 DAT16: JSR 5 DATTST ;LOAD PARAMETERS & RUN TEST 
2858 013542 000016 16 ;SEE NOTE 16 FOR DATA TEST PARAMETERS 
2859 000017 Y=Y+1 
2860 PRA ARERR AAA AAA ATTA A AEA A TATE T CAAA A AAA A TAHA eA eK eee eee Leet AAT eee eee 
2861 013544 000117 AT117: 117 ;ROUTINE #117 * 
2862 013546 013562 AT120 sADDRESS OF NEXT TEST * 
2863 013550 000003 3. ; ITERATION COUNT * 
2864 013552 013554 DAT17 :SCOPE ENTRY POINT * 
2865 000117 X=X+1 
2866 ee ne canna oon Ceomeeeete & te Ee 
2867 013554 004567 167752 DAT17: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
2868 013560 000017 17 ;SEE NOTE 17 FOR DATA TEST PARAMETERS 
2869 000020 Yer] 
2870 PRRRAAAAAAAAAA HA TATAA Hee TAA A Ae AAA AA eeeAeKeeeAeteeteeeterereeeneeeeeeereteeeeee 
2871 013562 000120 AT120: 120 sROUTINE #120 * 
2872 013564 013600 AT121 sy OF NEXT TEST ‘ 
2873 013566 000003 3. ; ITERATION COUNT ° 
2874 013570 013572 DAT20 :SCOPE ENTRY POINT * 
2875 000120 X=xe1 
2876 en atten sn oan Gemeeaens & ah TE ee 
2877 013572 004567 167734 DATZO: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
2878 013576 000020 20 ;SEE NOTE 20 FOR DATA TEST PARAMETERS 
2879 000021 Y=ve1 
2880 nee ee a nes deed teat eee ae 
2881 013600 000121 AT121: 121 sROUTINE #121 ® 
2882 013602 015616 AT122 TADDRESS OF NEXT TEST * 
2883 013604 000003 3. ; ITERATION COUNT * 
2884 013606 013610 DAT21 :SCOPE ENTRY POINT * 
2885 000121 K=Xe1 
2886 ee Rae ih ee Coote & to ee Ce 
soe 013610 004567 167716 DAT21: JSR 5,DATTST ;LOAD PARAMETERS & R 
888 013614 000021 21 ;SEE NOTE 21 FOR DATA. rest PARAMETERS 
2889 000022 v=¥1 
2890 aa + acne angen Egg TW mea ipin ctins gine plc pga 
891 013616 000122 AY122: 122 sROUTINE #122 \s : 
44 013620 013634 AT123 ADDRESS OF NEXT TEST : * 
893 013622 000005 3. ;TTERATION ON COUNT ° 
289% 013626 013626 DAT22 ;SCOPE ENTRY POINT . 
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2895 000122 X=X41 

2896 can a cine. aes Mendes Coe Gat ee ce 
2897 Bi 30¢8 004567 167700 DAT22: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 

2898 013632 000022 22 ;SEE NOTE 22 FOR DATA TEST PARAMETERS 

2899 000023 Y=Y+1 

2900 PRRAARAARAAAAAHEH HAA TAE HATHA AT AAATAAAAA HEATH TT AAH HAA ATAAK eee KATE eee eTeTAAe Tee 
2901 013654 000125 AT125: 123 ROUTINE #123 * 
2902 013636 013652 AT124 ;ADDRESS OF NEXT TEST * 
2903 013640 000003 3. ; ITERATION COUNT * 
2904 013642 013644 DAT23 ;SCOPE ENTRY POINT * 
2905 000123 X=X+1 

2906 Cc aa Cane. aes penne the ee 
2907 013644 004567 167662 DAT23: JSR 5,DATTST ;LOAD PARAMETERS & RUN T 

2908 013650 000023 23 ;SEE NOTE 23 FOR DATA Test T DARAME TERS 

2909 000024 Y=Y+1 

2910 PRRRARAA RAHA AEH AATE AAA A AAA TATA AAA AA AAKE RAK eAATKAAeeAKe eet eH Ae Tete Kee eTteT TAT ee 
2911 013652 000124 AT124: 124 ROUTINE 4124 * 
2912 013654 013670 AT125 TADDRESS OF NEXT TEST * 
2913 013656 000003 3. S ITERATION COUNT * 
2914 01 013662 DAT24 SSCOPE ENTRY POINT . 
2915 000124 X=X+1 

2916 eer pen ate a ae geeereede © ee Maa Se 
2917 013662 004567 167644 DAT24: JSR 5 ,DATTST ;LOAD PARAMETERS & RUN TEST 

2918 013666 000024 24 ;SEE NOTE 24 FOR DATA Test PARAMETERS 

2919 000025 Y=Y+1 

2920 PRRRAA RARER AAA A ETAT ETAT AAA AAA AAA AAA AAAATAAAAAAAAAAAAA Hee eee eee ete te eee 
2921 013670 000125 AT125: 125 ROUTINE #125 * 
$356 013672 013706 AT126 sADDRESS OF NEXT TEST * 
2923 013674 000003 Bs ; ITERATION COUNT * 
2924 013676 013700 DAT25 ;SCOPE ENTRY POINT * 
2925 000125 X=X+1 

2926 ee ee eee ee Remotes & tok Sea nn kes at 
2927 013700 004567 167626 DAT25: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 

2928 013704 000025 25 sSEE NOTE 25 FOR DATA TEST PARAMETERS 

2929 000026 Y=Y+1 

2930 RAR RRA AAA AAAA ATA ATTA TATE TATE E TATA TATA TEAK AAA AAA AT AAA AAA AAA Kee e AAA eee TTT 
2931 013706 000126 AT126: 126 ROUTINE #126 * 
2932 013710 013724 AT127 ;ADDRESS OF NEXT TEST a 
2933 013712 000003 3. ; ITERATION COUNT * 
2934 013714 013716 DAT26 ;SCOPE ENTRY POINT ® 
2935 000126 X=X+1 

2936 eee eee eo eee Reeemteeee i dee Sane en ee 
2937 013716 004567 167610 DAT26: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 

2938 013722 000026 26 : SEE NOTE 26 FOR DATA TEST PARAMETERS 

2929 000027 y=v+1 

2940 FRRA eee eeeH eRe AAH HATA ATTA A AAA AAA AAT AAA ATA AAA A AAA AAA Tete Arte KtAtIAAreeAT Tees 
2941 013724 000127 AT127: 127 ROUTINE #127 * 
2942 013726 013742 AT130 sADDRESS OF NEXT TEST * 
2943 013730 000003 . ; ITERATION COUNT * 
2944 013732 013734 DAT27 ;SCOPE ENTRY POINT * 
2945 000127 X=X+1 

2946 ner sae wean Fo meee a ee he Er” aeaemeneienn cst uote 
2947 013734 004567 167572 DAT27: JSR 5,DATTST ;LOAD PARAMETERS & RUN T 

2948 013740 000027 27 SEE NOTE 27 FOR DATA Test T PARAMETERS 

2949 000030 Y=¥+1 


PRAM A Ree eee HAA AAAAAA TATA TA AAA AKA RAHA AHA eeKeeeee AeA tA terete reer reee err eteA es 
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2951 013742 000130 AT130: 130 ;ROUTINE #130 * 
2952 013744 013760 AT131 sADDRESS OF NEXT TEST * 
2953 013746 000003 Be ;1TERATION COUNT * 
2954 013750 013752 DAT30 ;SCOPE ENTRY POINT ® 
2955 000130 X=X+1 
2956 a a SA) | ene romania ee 
2957 013752 004567 167554 DAT30: JSR 5 ,DATTST ;LOAD PARAMETERS & RUN TEST 
2958 013756 000030 30 ;SEE NOTE 30 FOR DATA TEST PARAMETERS 
2959 000031 Y=Y+1 
2960 SORA ERATE ERA E AERA A ARATE A TATRA AAAAAAAAARA RARER EAHA ARETE 
1 013760 000131 AT131: 131 ROUTINE #131 * 
2962 013762 013776 AT132 ;ADDRESS OF NEXT TEST * 
2963 013764 000003  F ; ITERATION COUNT * 
2964 013766 013770 DAT31 ;SCOPE ENTRY POINT * 
2965 000131 X=X+1 
2966 RRA RARER ERATE ATE A TEER ETAT TTA AAA HAA A ATR eee ee KeeeA eee eee ee eee eee Tee 
2967 013770 004567 167536 DAT31: JSR 5,DATTST ;LOAD PARAMETERS & RUN TEST 
2968 013774 000031 31 ;SEE NOTE 31 FOR DATA TEST PARAMETERS 
2969 000032 Y=Y+1 
2970 RARAR REAR AAT ATE TATE AAA T AERA A AAA TAA AAAA AAA K ATH AAA KATA KATA KATA TATE TTT 
2971 013776 000132 AT132: 132 ROUTINE #132 * 
2972 014000 014014 AT133 sADDRESS OF NEXT TESi ® 
2973 014002 900003 3. ; ITERATION COUNT * 
2974 014004 014006 DAT32 ;SCOPE ENTRY POINT * 
2975 000132 X=X+1 
2976 vine tar Ud Marae cakes tem horn 
2977 014006 004567 167520 DAT32: JSR 5,DATTST ;LOAD PARAMETERS & RUN- 
2978 014012 000032 32 :SEE NOTE 32 FOR DATA TEST T PARAMETERS 
2979 000033 Y=Y+1 
29 PRARAAA AERA AAA AAA A ACETATE ATE T ARERR ATTA AAA AAA TAHT Tee tet eeeerereretereeetees 
2981 014014 000133 AT133: 133 sROUTINE #133 5 
2982 014016 014032 AT134 SADDRESS OF NEXT TEST . 
2983 014020 000003 3, S ITERATION COUNT “ 
9 014022 014024 DAT33 ;SCOPE ENTRY POINT = * 
2985 000133 X=X+1 a 
29 eae aa Ee aaeeen nee Sementeee & iat ae ee. 
2987 014024 004567 167502 DAT33: JSR 5,DATTST ;LOAD PARAMETERS & RUN T 
2988 014030 000033 33 7SEE NOTE 33 FOR DATA TEST T PARAMETERS 
2989 000034 Y=Y+1 - 
2990 PReReAAKAAAAAAAAA AAA HAHA AT ATE TATA A RATA AAA KAKA KA AeA A eA AeA Arete Ate tte tteeeere ee 
2991 014032 000134 AT134: 134 ;ROUTINE #134 * 
2992 014034 014050 AT135 ;ADDRESS OF NEXT TEST . 
2993 014036 000003 Be ITERATION COUNT * 
2994 014040 014042 DAT34 ;SCOPE ENTRY POINT * 
2995 000134 X=X¢1 
2996 ea ann aakeed 2 eee RO TGE Et teak HERE ce ae 
2997 014042 004567 167464 DAT34: JSR 5,DATTST LOAD PARAMETERS & RUN TEST 
2998 014046 000034 34 ;SEE NOTE 34 FOR DATA TEST PARAMETERS 
$300 000035 Y=Y+1 
PERAARHAKAAAAAKA TATA Te AA TATA CAAA AA THAT TARA TA AA TA Te AA AAA tA tAAere rete errr ere Aree 
3001 014050 000135 AT135: 135 ROUTINE #135 * 
3002 014052 014066 AT136 sADDRESS OF NEXT TEST * 
3003 014054 000003 3. ; ITERATION COUNT * 
3004 014056 014060 DAT35 ;SCOPE ENTRY POINT * 
005 000135 X=X¢+1 
006 PRRA AREA ERA HAH TATA TA TATA TATA THAR Kee TATA TATA LATA AAA TATA AA tere etree rere re ret 


ignores 
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3007 014060 004567 167446 DAT35: JSR 5 ,DATTST ;LOAD PARAMETERS & RUN TEST 
3008 014064 000035 35 ‘SEE NOTE 35 FOR DATA TEST PARAMETERS 
3009 000036 Y=¥+1 
3010 FERRARA RARAAAAAAAAAH AEE A ETAT TATA AAAAAAAAAAREKAKHK Kee ee KeeAeAeeeeeeeTATA HAA e tte 
3011 014066 000136 AT136: 136 sROUTINE #136 + 
3012 014070 014104 AT137 ‘ADDRESS OF NEXT TEST ‘ 
3013 014072 000003 3, ‘ITERATION COUNT. ‘ 
3014 014074 014076 DAT36 ‘SCOPE ENTRY POINT ‘ 
3015 000136 K=X+1 
3016 Com: aa caatter . seus pennies & oe 18? 
3017 014076 004567 167430 DAT36: JSR 5 ,DATTST :LOAD PARAMETERS & RUN T 
3018 014102 000036 36 :SEE NOTE 36 FOR DATA rhs T DARAMETERS 
3019 000037 Y=¥+1 
3020 RRR E RARER AEE ERE E RAE AERA ERATE AEE AREAAEAAAAAAA HER ERE AERTS 
3021 014104 000137 AT137: 137 sROUTINE #137 * 
3022 014106 014122 AT140 ‘ADDRESS OF NEXT TEST * 
3023 014110 000003 3, ‘ITERATION COUNT ® 
3024 014112 014114 DAT37 :SCOPE ENTRY POINT ‘ 
3025 000137 K=X41 
3026 cas,” can” Et eastel  ssnee Rene OeE & ian Shak ee 
3027 014114 004567 167412 DAT37: JSR 5 DATTST :LOAD PARAMETERS & RUN TEST 
3028 014120 000037 37 “SEE NOTE 37 FOR DATA TEST PARAMETERS 
3029 000040 Y=Y+1 
3030 
3031 
3032 014122 000140 AT140: 140 : TEST NUMBER 140 
3033 014124 014236 AT141 ;ADDRESS OF NEXT TEST 
3034 014126 000012 10. ‘TEST ITERATION COUNT 
3035 014130 014152 APBA ‘SCOPE ENTRY POINT 
3036 PY POTS TTTTTTOTTTTTTTTTTTTTTTTTTTTITT TI TTT TTT TTT LILI 
3037 DATA TEST USING JUMPER CONNECTOR. TX SPEED = 11, RX SPEED = 11, 
3038 “CHAR LENGTH = 11, STOP CODE = 1. USES SPECIAL BINARY COUNT PATTERN 
be FOR DATA. NO INTERRUPT. 
3041 014132 012777 000430 164744 MOV #430,aTXCSR sSET TX SPEED = 11, STOP CODE = 1 
3042 014140 012777 003031 164732 MOV #3031, ARXCSR 'SET RX SPEED = 11, CHAR. LENGTH = 11 
3043 014146 004767 166754 JSR 7, 1NBIN sSHITIALIZE BINARY COUNT PATTERN 
3044 014152 012767 001750 165066 APBA: MOV #1000. ,CTRA 'SET CHARACTER COUNT TO 1000 
3045 014160 105777 164720 APBB: TSTB  aTXCSR ‘WAIT FOR TX READY 
3046 014164 100375 BPL 4 
3047 014166 004767 167040 JSR 7,GTBINP :GET BINARY CHARACTER 
3048 014172 110167 165034 MOVB 21,CRBUFA :SAVE CHAR IN CRBUFA AND 
3049 014176 042767 177740 165026 BIC #177740,CRBUFA :MASK OFF ALL BUT 5 LSB. 
3050 014204 110177 164676 MOVB %1,aTXBUF [LOAD CHAR. 
3051 014210 105777 164664 TSTB = @RXCSR :WAIT FOR RECEIVER 
3052 014214 100375 BPL a4 -TO RECEIVE CHARACTER 
3053 014216 117767 164660 165004 MOVB = @RXBUF , CRBUF :LOAD RECEIVED DATA INTO CRBUF 
3054 014224 104004 DATCHK HECK DATA 
3055 014226 005367 165014 DEC CTRA TESTED 1000 CHARACTERS 
3056 014232 00135 BNE APBB “BRANCH IF NOT 
3057 014234 104012 SCOPE YES. SCOPE 
3058 peeeeeeeeeeeeeeeeteretetreneetteeeaneeeteKtteekeeeeeeeeeneneeeereneeeees 
3059 014236 000141 AT141: 141 :TEST NUMBER 141 
3060 014240 177777 ATLAST ‘ADDRESS OF NEXT TEST 
3061 014242 °000144 100. ‘TEST ITERATION COUNT 
3062 014244 014246 AQBA :SCOPE ENTRY POINT 
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3063 

3064 

3065 

3066 

3067 014246 012777 
3068 014254 012777 
3069 014262 012777 
3070 014270 105777 
3071 014274 100375 
3072 014276 027727 
3073 014304 001401 
3074 014306 104003 
3075 014310 104011 
3076 014312 104012 
3077 

3078 014314 052777 
3079 014322 005077 
3080 014326 104016 
3081 014330 000310 
3082 014332 000207 
3083 

3084 014334 026767 
3085 014342 101424 
3086 014344 026767 
3087 014352 101420 
3088 014354 026767 
3089 014362 101414 
$090 014364 026767 
091 014372 101410 
3092 014374 026767 
3093 014402 101404 
3094 014404 026767 
3095 014412 101002 
3096 014414 062716 
3097 014420 000207 
3098 

3099 

3100 

3101 

3102 

3103 014422 104000 
3104 014424 016043 
3105 014426 004567 
3106 014432 004767 
3107 014436 104000 
3108 014440 016275 
3109 014442 000000 
3110 014444 116767 
3111 014452 116777 
3112 014460 104016 
3113 014462 000000 
3114 014464 000767 
3115 

3116 

3117 

3118 014466 104000 
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000004 


164604 
164600 


000004 
164560 


164706 
164676 
164666 
164660 
164650 
164642 
000002 


164630 
164616 
164616 


000000 
164562 


164706 
164700 
164672 
164660 
164652 
164642 


000010 
164426 
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SRRRAAAAAAARERAAAAEA EERE AREER EAE RA RARER AHHH AAAAAAAAAKAK HAKATA HAE 


;TEST THAT WHEN RXCSR BIT 1 IS SET THAT THE OUTPUT DATA LINE 


:1S PULLED TO A SPACE. 


AQBA: #B1T2,aTXCSR 
MOV #B1T1,aRXCSR 


;SET MAINTENANCE BIT IN TXCSR 


MOV #377 ,aTXBUF ;LOAD BUFFER 

TSTB ARXCSR ;WAIT FOR RECEIVER 

BPL 74 ;TO RECEIVE CHARACTER 

ar9 ae ane :CHARACTER RECEIVED SHOULD BE 0 
.+ 

ERROR ;CHARACTER OTHER THAN 0 


OPE 
;sueRout INE TO SET RXCSR DONE BIT. 


; ISSUE RESET 


BIS #BIT2,aTXCSR ;SET MAINTENANCE BIT. 
CLR aTXBUF “LOAD TXBUF. 
DELAY :DELAY 200 MSECS. 
200. 
RTS %7 sEXIT. 
;SUBROUTINE TO CHECK THAT CTRA THROUGH CTRD CONTAIN DESCENDING VALUES. 
CMPT: CMP CTRA,CTRB 
BLOS CMPTA 
CMP CTRA,CTRC 
BLOS MPT 
CMP CTRA,CTRD 
BLOS CMPTA 
CMP CTRB,CTRC 
BLOS CMPTA 
CMP CTRB,CTRD 
BLOS CMPTA 
CMP CTRC,CTRD 
BHI CMPTB 
CMPTA: ADD #2,a%6 
CMPTB: RTS %7 


peereeeenee 


;PRG1 - TRANSMITTER SCOPE LOOP 


,eteeeeeane 


PRGI: TYPE : TYPE PROGRAM TITLE. 
JSR LINSEL :GO GET LINE # FROM USER 
JSR 34 SETPAR =GO SET PARAMETERS. 
TYPE ‘TYPE SELECT CHAR AND DELAY. 
SELCAD 
HALT :WAIT FOR USER 
PRG1A: MOVB SR,PRGIB :DELAY | COUNT TO PRG1B. 
MOVB  SR+1,aTXBUF “LOAD TXBUF . 
DELAY “DELAY # OF MSECS. SET AT SR. 
PRG1B: OPEN 
BR PRGIA :REPEAT. 
peteeteneee 
*PRG2 - RECEIVER SCOPE LOOP. 
*e@eeeenaeet 
PRG2: TYPE : TYPE PROGRAM TITLE. 


SEQ 0056 





i 
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3119 014470 016103 P2TIT 

3120 014472 004567 166304 JSR 5 LINSEL 760 GET LINE # FROM USER 

3121 014476 004767 000236 JSR <7 SETPAR :G0 SET PARAMETERS. 

3122 014502 104000 TYPE : TYPE SELECT CHAR AND DELAY. 

3123 014504 016275 SELCAD 

3124 014506 000000 HALT sWAIT FOR USER. 

3125 014510 004767 000256 PRG2A: JSR 7,STPARB ‘RELOAD PARAMETERS 

3126 014514 052777 000004 164362 BIS aitD, aTXCsR =SET MAINTENANCE BIT. 

3127 014522 116767 163042 000010 MOVB _— SR, PRG2B DELAY COUNT TO PRG2B. 

3128 014530 116777 163035 164350 MOVB = SR#1,aTXBUF ‘LOAD TXBUF 

3129 014536 104016 DELAY ‘DELAY # OF MSECS. SET IN SR. 
3130 014540 000000 F2G2B: OPEN 

3131 014542 017700 164334 MOV @RXBUF , %0 :RXBUF CONTENTS TO 90. 

3132 014546 000005 RESET “DISPLAY CONTENTS OF RXBUF (IN RO), 
3133 014550 000005 RESET :BY ISSUING 5 RESET INSTRUCTIONS 
3134 014552 000005 RESET 

3135 014554 000005 RESET | 

3136 014556 000005 RESET 

3137 014560 000753 BR PRG2A 

3138 peeeeeeeene 

3139 =PRG3 = SINGLE CHARACTER MAINTENANCE MODE DATA TEST. 

3140 pe eeeeeneee 

3141 014562 104000 PRG3: TYPE s TYPE PROGRAM TITLE. 

3142 014564 016604 P3TIT 

3143 014566 004567 166210 JSR LINSEL :GO GET LINE # FROM USER 

3144 014572 004767 000142 JSR zt SETPAR ‘SET PARAMETERS. 

3145 014576 104000 TYPE : TYPE: SELECT CHARACTER. 

3146 014600 016750 SELCAR 

147 014602 000000 HAL 

3148 014604 116767 162760 164420 PRG3A: MOVB  SR,CRBUFA :MOVE DATA CHAR TO CRBUFA. 

3149 014612 004767 000040 JSR %7,MOUTIN :GO OUTPUT, RECEIVE, AND CHECK DATA. 
3150 014616 000772 BR PRG3A 
3151 seeeereeeee 
3152 “PRG - SPECIAL BINARY COUNT MAINTENANCE MODE DATA TEST. 

3153 peeeeereeee 

3154 014620 104000 PRG4: TYPE : TYPE PROGRAM TITLE. 

3155 014622 016654 P4TIT 

3156 014624 004567 166152 JSR 5 LINSEL :G0 GET LINE # FROM USER 

3157 014630 004767 000104 JSR 17, SETPAR :SET PARAMETERS. 

3158 014634 004767 166266 JSR 17. 1NBIN : INITIALIZE BINARY COUNT. 

3159 014660 004767 166366 PRG4A: JSR %7,GTBINP GET BINARY CHA RACTER. 

3160 014644 110167 164362 MOVB %1,CRBUFA :SAVE AT CRBUF 

3161 014650 004767 000002 JSR 27, MOUTIN :60 OUTPUT, RECEIVE, AND CHECK DATA. 
3162 014654 000771 BR PRG4A *REPEAT 

3163 , SUBROUTINE TO OUTPUT, RECEIVE, AND CHECK DATA WITH MAINTENANCE BIT SET. 
3164 014656 032767 000400 162704 MOUTIN: BIT #B1T8.SR :SEE IF BIT 8 IS SET. 

3165 014664 001001 BNE +4 ‘BRANCH IF SET. 

3166 014666 104002 STALL :SET. DO A RANDOM STALL. 

3167 014670 105777 164210 TSTB = @TXCSR “WAIT FOR TX READY. 

3168 014674 100375 BPL 74 

3169 014676 052777 000004 164200 BIS #B1T2,aTXCSR :SET MAINTENANCE BIT. 

3170 014706 016777 164322 164174 MOV CRBUFA,@TXBUF ;LOAD TXB 

3171 014712 046767 164316 164312 BIC CARMSK.CRBUFA  : MASK ore UNON-EXPECTED BITS. 

3172 014720 105777 164154 TSTB = @RXCSR “WAIT FOR RECEIVER DONE BIT. 

qi 014724 100375 BPL 74 

174 014726 017767 164150 164274 MOV @RXBUF , CRBUF :MOVE CHAR IN RX BUFFER TO CRBUF. 
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000020 


000400 
000010 


000020 
000020 
000004 


000010 


000002 
177700 
002000 
000001 


177740 
001000 


000001 
177600 





164312 


164266 


164074 
164250 


164056 


164120 
164056 
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Z2wowwooww 
Oe ee FT es ee be PTT 
<nuNo-muNvo-4 


SEQ 0058 


;COMPARE EXPECTED AND RECEIVED DATA 
x7 sEXIT. 


;SUBROUTINE TO SET STOP CODE,SPEED, AND CHARACTER LENGTH PARAMETERS SET 
;IN SR INTO TXCSR AND RXCSR. 


TYPE: SELECT PARAMETERS. 


;WAIT FOR USER. 
SR,SRT ;SR TO SRT. 
5 ,OACNV 


welts, SRT :SEE IF SR BIT 4 IS SET. 
+10 “BRANCH IF NOT SET. 
reir. aTXCSR :SET. SET STOP CODE TO A 1. 
#BIT3.SRT :SEE IF SR BIT 3 IS SET. 
+16 ‘BRANCH IF NOT SET. 
#BITG,aTXCSR ‘SET BIT4 IN TXCSR AND RXCSR 
#BITG.ARKCSR =(MSB OF SPEED SELECT BITS.) 
B12, SRT ‘SEE IF SR BIT 2 IS SET. 
;BRANCH IF NOT SET 
weit, aTXCSR SET BIT3 IN TXCSR AND RXCSR 
#BIT3.aRXCSR :(LSB OF SPEED SELECT BI7S). 
#177460, CARMSK *SET CHARACTER MASK TO : BITS. 
welt iF SRT [SEE IF SR BIT 1 IS SET 
STP “BRANCH IF NOT SET 
3177700, CARMSK “CHANGE CHAR MASK TO 6 BITS. 
#B1T10,aRXCSR :SET RXCSR BIT TOcMsB oF CHAR LENGTH BITS. 
#BITO,SRT =SEE IF SR BITO IS SET 
+16 ‘BRANCH IF NOT set. 
#177740, CARMSK “CHANGE CHAR MASK TO S BITS. 
#8119, ARXCSR :SET_RXCSR BIT9 (LSB OF CHAR LENGTH BITS). 
#8110, SRT “SEE IF SR BITO IS SET. 
STPARA-2 ‘BRANCH IF NOT SET. 
7177600 CARMSK “CHANGE CHAR MASK TO 7 BITS. 
STPARA~10 
:LINE 0 VECTOR 
“LINE 1 VECTOR 
‘LINE 2" 
: ef 3 ef 
: ee 4 se 
: es 5 a) 
: ee 6 ee 
: ef 7 ef 
: se 10 ef 
: ef 11 se 
s ee 12 ee 
: ef 13 ef 
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2) 10=-JUN-80 10:55 PAGE 60 
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| 
SEQ 0059 : 
3231 015210 000440 440 = | 
3232 015212 000450 450 es . Te 
3233 015214 000460 460 oS oe 
3234 015216 000470 470 . a Oe 
3235 015220 000500 500 Bee Be 
3236 015222 000510 510 Seg» Eee 
3237 015224 000520 520 ae Phe 
3238 015226 000530 530 eb-d  ee 
3239 015230 000540 540 Bei eee tee 
3240 015232 000550 550 ‘begs - Bee 
3241 015234 000560 560 See Re- 
3242 015236 00057 570 ee a 
3243 015240 00060 600 cn ae 
3244 015242 000610 610 Yee Te 
3245 015244 00062 620 ‘eae Ew 
3246 015246 000630 630 . > ae 
3247 015250 000640 640 . 2 a 
3248 015252 000650 650 7 oe ee 
3249 015254 000660 660 Tete Fe 
3250 015256 000670 670 ae ee eat 
3251 
3252 
3253 
3254 sASCI1 MESSAGES 
3255 015260 050045 040 EMO: meil. *a ” 
3256 015263 040 020040 052040 APNUMB: .ASCII ' 7+ 
3257 015270 040 
3258 Heh 14 040 020040 050040 ATNUMB: .ASCII ° PC ' 
3259 015276 020103 
3260 015300 0200 020040 020040 APC: ASCII ' a’ 
3261 015306 020040 100 
3262 015311 045 050045 043522 POTIT: .ASCII ‘%%XPRGO - INPUT-OUTPUT LOGIC TESTS. ° 
3263 015316 020060 020055 047111 
3264 015324 052520 026524 052517 
3265 015332 050124 052125 046040 
3266 015340 043517 041511 052040 
3267 015346 051505 051524 020056 
3268 015354 044504 041523 047117 LASCII "DISCONNECT DC11 FROM MODEM.2' 
3269 015362 Sta 052103 042040 
3270 015370 030503 020061 051106 
3271 015376 046517 046440 042117 
3272 015404 peas0s 022456 
3273 015410 047101 020104 047503 ASCII "AND CONNECT JUMPER TO CABLE.%a' 
3274 015416 047116 041505 020124 
275 Hat O3ge is 050115 051105 
276 015432 05204 peOriy 040503 
3277 015440 046102 3 105 040045 
3278 015446 esate 051503 020122 ATXCSR: .ASCII ‘TXCSR S/B: ° 
79 015454 027523 035102 040 
280 015461 040 et 020040 ATXSB: .ASCII ' WAS: ‘ 
281 0154 0200460 053440 051501 
Hy 015474 she 4 
283 015476 020040 020040 020040 ATXWAS: .ASCII ‘ a' 
284 015504 100 
285 015505 122 041530 051123 ARXCSR: .ASCI] ‘RXCSR S/B: ° 
3286 015512 051440 041057 020072 









rs 
L.4 
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C2DCAD.P11-10=JUN-B0 10:47 SEQ 0060 | 
3287 015520 020040 020040 020040 ARXSB: .ASCII ' WAS: | 
3288 015526 020040 040527 035123 
3289 015534 040 
3590 015535 040 020040 020060 ARXWAS: .ASCII ' a' 
3291 015542 040040 
3292 015544 054124 051440 042520 ETXTIM: .ASCII ‘IX SPEEDS NOT IN ASCENDING ORDER.@' 
3293 015552 042105 020123 047516 
3294 015560 020124 047111 040440 
3295 015566 041523 047105 044504 
3396 015574 043516 047440 042122 
3297 015602 051105 040056 
3298 015606 044526 042515 043040 ESTPCD: .ASCII ‘TIME FOR 2 STOP CODE OP LESS THAN FOR 1.@° 
3299 015614 051117 031040 051440 
$300 015622 047524 020120 047503 
3301 015630 042504 047440 020120 
3302 015636 042514 051523 052040 
3303 015644 040510 020116 047506 
3304 015652 020122 027061 100 
3305 015657 124 020130 044103 ETCLGT: .ASCII ‘TX CHAR LENGTHS NOT IN DESCENDING ORDER.@' 
3306 015664 051101 046040 047105 
3307 015672 052107 051510 047040 
$308 015700 052117 044440 020116 
3309 015706 042506 041523 047105 
$310 015714 044504 043516 047440 
$311 015722 042122 051105 040056 
3312 015730 054122 051440 042520 ERXTIM: .ASCII] ‘RX SPEEDS NOT IN ASCENDING ORDER.@' 
3313 015736 042105 020123 047516 
3316 015744 020124 47111 40440 
315 015752 041523 047105 044504 
3316 015760 043516 047440 042122 
3317 015766 051105 040056 
3318 015772 054122 041440 040510 ERCLGT: .ASCII ‘RX CHAR LENGTHS NOT IN DESCENDING ORDER.@' 
3319 016000 020122 042514 043516 
$320 016006 044124 020123 047516 
3321 016014 020124 047111 042040 
3322 016022 051505 042503 042116 
3393 016030 047111 020107 051117 
3324 01603 042506 027122 100 
3325 01604 045 050045 043522 PITIT: .ASCII ‘ZXPRG1 - TRANSMITTER SCOPE LOOPa’ 
3326 016050 020061 020055 051124 
3397 016056 047101 046523 052111 
$328 016064 042526 020122 041523 
$3399 016072 050117 020105 047514 : 
3330 016100 050117 100 
3331 016103 045 050045 043522 P2TIT: .ASCI] ‘2RPRG2 - RECEIVER SCOPE LOOP@’ 
3332 016110 02 020055 042522 
33$ 016116 042503 053111 051105 
334 016124 051440 047503 042520 
335 016132 046040 047517 040120 
3 01614 $1445 052105 050040 SELPAR: .ASCI] ‘%SET PARAMETERS IN SR AS FOLLOWS:" 
3337 016146 051101 046501 052105 
338 016154 051105 020125 47111 
339 016162 051440 020122 051501 
$40 016170 045040 046117 047514 
341 016176 05152 072 
$42 016201 045 051123 020064 LASCIL "RSRG = STOP CODEXSR3 AND 2 = SPEED' 











-MAIN. MACY11 30A(1052) 10-JUN-80 10: 
CZDCAD.P11 10-JUN-80 10:47 
3343 016206 020075 052123 050117 
3344 916214 041440 042117 022505 
3345 Or es¢e 051123 020063 047101 
3346 0162350 020104 020062 020075 
3347 016236 050123 042505 104 
3348 016243 045 051123 020061 
3349 016250 047101 020104 020060 
3350 016256 020075 044103 051101 
3351 016264 046040 047105 052107 
3352 016272 022510 100 
3353 016275 045 042523 020124 
3354 016302 042524 052123 041440 
3355 016310 040510 020122 047503 
3356 016316 042504 044440 020116 
3357 016324 051123 032461 051455 
3358 016332 034122 020054 042523 
3359 016340 020124 042504 040514 
3360 016346 020131 044524 042515 
3361 016354 044440 020116 051123 
3362 016362 026467 051123 027060 
3363 016370 100 
3364 016371 40 042040 052101 
3365 016376 020101 051105 020122 
3366 016406 051440 041057 020072 
3367 016412 0 020040 053440 
3368 016420 051501 020072 
3369 016424 020040 040040 
33/0 he 037445 199 
371 0164 045 042523 020124 
3372 016440 504 044523 042522 
3373 016446 020104 051123 047440 
3374 016454 052120 047511 051516 
3375 016462 020056 047516 046522 
3376 016470 046101 047440 042520 
3377 016476 040522 044524 047117 
3378 016504 040 
3379 016505 111 020123 044527 
3380 016512 044124 051440 020122 
3381 016520 020075 030060 030060 
3382 pre3ee 030060 100 
3383 016531 045 047111 047503 
3384 016536 051122 041505 020124 
3385 016544 047522 052125 047111 
3386 016552 020105 042523 042514 
3387 016560 052103 Bee192 040056 
3388 presse 050045 047522 051107 
389 016574 046501 042440 042116 
390 016602 oy yeey 
391 016604 pecee 051120 031507 
398 016612 051455 047111 046107 
393 016620 020105 pee 8s 051101 
394 016626 srert| 4501 052116 
395 0166 6440 042117 020105 
3% bees} 040504 ott 052040 
397 016650 051505 040124 
398 016654 022445 051120 032107 


55 PAGE 62 
ASCII 
SELCAD: .ASCII 
ERDAT: .ASCII 
AASB: ASCII 
AWAS: ASCII 
AINPRG: .ASCII 
ASETSR: .ASCII 
ASCII 
AINCRT: .ASCII 
APGEND: .ASCII 
P3TIT: .ASCII 
P4TIT: .ASCII 





SEQ 0061 


"ZSR1 AND 0 = CHAR LENGTH%@' 


"ZSET TEST CHAR CODE IN SR15-SR8, SET DELAY TIME IN SR7=SRO.a° 


* DATA ERR S/B: ' 


. WAS: ° 
' a' 


"Z79' 


"%SET DESIRED SR OPTIONS. NORMAL OPERATION ' 


"IS WITH SR = 0000008" 


*ZINCORRECT ROUTINE SELECTED.@' 


*ZPROGRAM END.a@' 


"ZZPRG3-SINGLE CHAR MAINT MODE DATA TESTa’ 


*ZZPRG4-SPEC BIN COUNT MAINT MODE DATA TESTa’ 





«MAIN. MACY11 30A(1052) 10=-JUN-80 10:55 PAGE 63 


SEQ 0062 ; 





CZDCAD.P11 10-JUN-80 10:47 
3399 016662 051455 042520 020103 
3400 016670 ett ts 020116 047503 
3401 016676 047125 020124 040515 
3402 016704 047111 020124 047515 
3403 016712 042504 042040 052101 
3404 016720 020101 042524 052123 
3405 016726 100 
3406 gieres 045 040520 040522 PARMTS: ASCII ‘PARAMETERS = ' 
3407 0167 042515 042524 051522 
3408 016742 036440 040 
3409 016745 040 040040 APARM: .ASCII ‘. @' 
3410 016750 051445 052105 052040 SSLCAR: .ASCI] ‘XSET TEST CHAR CODE IN SR7=SRO.@' 
3411 016756 051505 020124 044103 
3412 016764 051101 041440 042117 
3413 016772 020105 047111 051440 
3414 017 033522 051455 030122 
3415 017006 040056 
3416 017010 046045 040517 020104 LDLINE: .ASCII ‘%LOAD LINE NO. (8) INTO SR 3-7@' 
3417 017016 044514 042516 047040 
3418 017024 027117 024040 024470 
3419 017032 044440 052116 020117 
3420 017040 051123 031440 033455 
3421 017046 100 
3422 017047 040 046040 047111 ALINE: .ASCII ‘ LINE NO." 
3423 017054 020105 047516 056 
3424 017061 040 020040 040527 SELINE: .ASCII] ‘ WAS SELECTED’ 
3425 017066 020123 042523 042514 
3426 017074 052103 042105 100 
3427 017101 000001 DEND:  .END 








ut 3 
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0 CROSS REFERENCE TABLE -- USER SYMBOLS 

AAA 003766 1190 11934 
AAAA 006300 1700 17034 
AAAB 006312 1704 17064 
AAB 004000 1195#@ 1198 
AABA 012624 2601 26064 
AABB 012650 26124 2618 2621 
AABC 012660 2607 26148 
AABD 012674 2615 26174 
AABE 012700 2614 26194 
AAE 004002 1193 11964 
AASB 01641 751 33674 

A 00402 1203 12064 
ABAA 007302 1919 19224 

007374 1926 19394 
ABB 004032 12084 1211 
ABBA 012716 2627 26304 
ABBB 012750 2636 26384 
ABE 004034 1206 12094 
ACA 004052 1217 12214 
ACAA 007406 1945 19494 
ACAB 007542 1962 19748 
ACB 004064 12234 1226 
ACBA 012776 649 26544 
ACBB 013034 2653 26624 
AcBC 013036 2661 26634 
ACE 004066 1221 12244 
ADA 004104 1232 12354 
ADAA 007562 1980 19834 
ADAB 007576 1985 19874 
004116 1237# = 1240 

AD 004120 1235 12384 
ADTENP 003512 1111 11304 

A 0041 1246 12494 
AEAA 007612 1994 19984 
AEAB 00763 2002 20054 
AEB 004152 1250 12534 
AEC 00417 1255 12584 
AED 004214 1252 1257 1260 12624 
AFA 0042 1269 12724 
AFAA 007644 2011 20154 
AF AB 007672 2020 20234 
AFB 0042 1274 12778 
AFBA 006324 1718 17234 
AF BB 006346 1725 17284 
AF BC 006366 1727 1730 17324 
AFC 004302 1279 12824 
AFD 004322 1276 1281 1284 12864 
AGA 004334 1292 12954 
AGAA 007704 2028 20324 
AGAB 007732 2037 20404 
AGB 004350 1296 if 44 94 
AGBA 006402 1738 17434 
AGBB 006432 1746 17498 
AGBC 006462 1755 17584 
AGBD 006476 1760 17644 
AGBE 006526 1748 1757 1762 1770 1772 17734 









HS Pe Te 
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CZDCAD.P11 10-JUN-80 10:47 CROSS REFERENCE TABLE -- USER SYMBOLS 
AGC 004372 1301 1304¢ 
AGD 004412 1298 1303 1306 13084 
AHA 004434 1315 13184 
AHAA 007744 2046 20504 
AHAB 007772 2055 20584 
AHB 004450 1319 13224 
AHC 004472 1324 13278 
AHD 004512 1321 1326 1329 13314 
AIA 004534 1340 13434 
ALAA 010004 2064 20684 
ALAF 010144 2086 20894 
ALAS 010146 207 2076 2080 2083 20904 
AIASA = 010170 20964 2100 
AIAST 010210 20 2077 2081 2084 2090* 2098* 21024 
AIB 00455 1344 13474 
AIC 00457 1349 13524 
AID 00461 1346 1351 1354 13564 
AINCRT 016531 726 33834 
AINPRG 016430 33708 
AJA 004634 1363 13664 
AJAA 010222 2107 21124 
AJAB 010306 2121 21254 
AJAS 010310 2115 2118 21264 
AJASA 010332 21324 2136 
AJASB 010354 21384 2142 
AJAST 010374 2116 2119 2126* = 2134* 2140* 21448 . 
AJB 00465 1368 13714 
AJBA 006656 1810 18154 
AJBB 006674 1817 18204 
AJBC 006716 1822 18254 
AJBD 006736 1824 1827 18294 
AJC 004700 1373 13764 
AJD 00472 1370 1375 1378 13804 
AKA 004742 1390 135944 
AKAA 0104 2151 21564 
AKAB 010554 2175 21784 
AKAS 010556 2161 2165 2169 2172 21798 
AKASA 0106 21854 2189 
AKAST 010620 2162 2166 2170 2173 2179* = =2187* 21918 
AKB 004752 1395 13974 
AKBA 006752 1835 18414 
BB 0067 18424 
AKBC 007010 1845 18484 
AK 007024 1849 18524 \ 
AKBE 007054 1847 1851 1856 18594 
ALA 0047 1402 14054 
ALAA 010632 2198 22034 
ALAB 010662 2208 22114 
ALAC 010674 2210 2213 22154 
ALB 005000 1406 14094 
ALBA 007176 1892 18974 
ALBB 007220 1899 19024 
ALBC 007246 1906 19094 
ALBD 0072 1901 1908 1911 19134 
ALC 005022 1411 14144 
ALD 00504 1408 1413 1416 14184 


NS ies caer ce 
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ALINE 017047 1047 sethe 
AMA 005064 1427 14304 
AMAA =-_: 01006 2220, 4922248 
AMAB =: 0010720 22268 2227 
AMAC =: 010742 2230 = e2328 
005076 1431 14334 
AMBA 006542 1780 17854 
AMBB =: 006600 1790 17934 
AMBC 006614 1794 17978 
AMBD 006642 1792 1796 1800 18024 
ANA 005110 1440 144354, 
ANAA =: 010754 2239 22448 
ANAB = 00111024 2252 22548 
ANB 005132 1445 14484 
ANBA = 013050 26748 
ANBB == 013062 2671 26768 
ANBC 013070 2677" 2706 
ANBD) 013132 26864 2690 
ANBE 013166 2692 26964 
ANBF 013172 2694 26984 
ANBG 013212 2695 2697 27054 
ANC 005150 1450 14534 
AND 005170 1447 1452 1455 14574 
ANW 005202 1462 14664 
ANX 005216 1467 14704 
ANY 005240 1472 14754 
ANZ 005260 1469 1474 1477 14794 
AOAA = =011042 2261 22664 
AOAB s O11112 2274 2276a 
AOBA =: 007070 1865 18694 
A088 007112 1871 18744 
AOBC 007142 1877 18804 
AOBD 00716 1873 1879 1882 18844 
APA 00530 1487 14904 
APAA = 011130 2282 = 228 7# 
APAB_ 0111 2293 2295e 
APARM 016745 3187 34094 
005314 1491 14934 
APBA = 0.14152 3035 3044a 
014160 3045@ 3056 
APC 015300 772 3260 
APGEND 0165 730 3884 
01526 776 2568 
AQA 005326 1498 =: 15014 
AQAA = 011202 2303 3084 
AB Briese 2334 334 
AQAS 11424 2315 21 2327, 2331 23388 
AQASA 311238 23454 349 
AQAST 11472 2316 322.0 2328 = 2332 233B* «= 347" = 5518 - 
005342 soos 1505@ P 
AES 4 306 30674 ; 
aac 5 1507 15108 > 
ase eeee 3 21 1307 1512 15148 
Rat | li 
ARAB 011652 382 385a 





SEQ 0066 
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10-JUN-80 


10-JUN-80 10:47 


MACY11_ 30A(1052) 


-MAIN. 
CZDCAD.P11 


23864 
2386* 2397* 24018 


2379 
2380 
15374 
24284 
15764 


= 
Oo ~ w mo ~w 
~ re ~ Nem ~ 
- Mw w ww wo 
Nu ™ - fasts] - 

2222 SB 2 2222 zz Beez BRBz BBV BVVRVVVVHVVTVRVVVeVwVeeeVezezezwVwTeeeeez 
MAMDOMMAUIMNKR ON — OMVUCUR.. Ne — OR FT MAODDOMA ORK ee ere eK KC eK eK Ke Ke KK KK 
Ol RAMA MM OOO OK — NNR OFFA. OSNND OMAR DODOM— UMTINOR DODO UM TNODR. ORO 
OS OSLO IID OOO DIN DIINO NINN NNN CININ = NICIONIS 


me Re a 
DWNAMNMN — OR- MOOG DN KR — TF OOMUMOWOR. OOOH DPD OR CUCU CUCU CIC CCE CUI N eC 
DO OMTMNMCUP- OPR-NO — — — — OO OVO TMNT DOT DMMMPr Oe O— UM TNOR MODAO UM TMOOR. DOO 
PIT PADIAD AN OO OWN SF TTT TWN AST TN OR OAR  — MORALARA API KR. CcoCOCOa@aMma aca 
QA RK eM ROOM KK NNNNN ORK KONING NINN NINN NNN NINN COON 


CHK KHMNMNANNNNN F&F K— NNN RV NAR AMMAN FT ST MIP MEET PED PPP WF PTET EY 
Oaooeco oooooo°c;j[“°ooeo Cooocooeo-CooocKe]fm COSCO COCOCSCOCOCOCOoOoOOoOooooo 
u 
x w" [. 4 — a wn 
LRA <@ OAS _<aveow = vo 2ES8S cSSSSSSSS— Sede se RANN 
ow Cel el oe oe el el el el el 
CEES AENNNANNNNNDNDDNE F&F 
errr reerre errr ere eee eet tek 
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AT124 013652 2902 29114 
AT125 013670 2912 29218 
AT126 =: 013706 2922 2934 
AT127 = 013724 2932 29418 
AT13 004754 1388 13994 
AT130 =. 013742 2942 29518 
AT131 013760 2952 29614 
AT132 © 013776 2962 29718 
AT133 =. 014014 2972 29814 
AT134 014032 2982 29918 
AT135 014050 2992 30014 
AT136 =. 0014066 3002 30114 
AT137 = 014104 3012 30214 
AT14 005054 140 14244 
AT140 = 014122 3022 30324 
AT141 014236 3033 30594 
AT15 005100 1425 14378 
AT16 005172 1438 14594 
AT17 005272 1460 14844 
AT2 004042 1201 12144 
AT20 005316 1485 14954 
AT21 0054 1496 15184 
AT22 005516 1519 15424 
AT23 0055 1543 15564 
AT24 005650 1557 15804 
AT25 005674 1581 15924 
AT26 005774 1593 16154 
At27 00607 1616 16384 
ATS 004074 1215 12294 
AT30 006174 1639 16614 
AT31 006220 1662 16734 
AT32 006244 1674 16864 
AT33 006270 1687 16974 
AT34 006314 1698 1715a 
AT35 006372 1716 17354 
AT36 006532 1736 17774 
A137 00664 1778 18074 
AT4 004126 1230 12434 
AT40 006742 1808 18324 
ATG) 00706 1833 18624 
AT42 007166 1863 18894 
AT43 007272 1890 19164 
ATGG 007376 1917 19424 
AT45 007552 1943 19778 
AT46 007602 1978 19914 
A147 007634 1992 20084 
ATS 0042 1244 12664 
AT50 007674 2009 20254 
AT5S1 0077 2026 20434 
ATS2 007774 2044 20614 
ATS3 910212 2062 21044 
ATS4 010376 2105 21484 
AT55 010622 2149 21958 
AT5S6 010676 2196 22178 
A157 010744 2218 22368 
AT6 004324 1267 12894 
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A160 —- 011032 2237s 22584 
A161 —-011120 2259 22798 
Alo62 ss 011172 2280 23004 

A163 —s- 011474 2301 -2355a 

A164 =: 011732 2356 3=— 24054 

AT6S —- 012046 26406 = 24374 

A166 =: 012120 26438 24598 

A167? =: 012176 2460 24814 

AT? 004424 1290 13128 

AT70 —- 012262 2482 2504" 

AT71 012360 2505 25308 

AT72, —- 012436 2531 925534 

AT73. 012520 2554 25748 

AT74 012610 2575 25988 

A175. —- 012706 2599 26244 

AT76. = 012762 2625 2646" 

A177 —-013040 2647 26684 

AUA 005704 1595 1598 

AUAA =: 012134 2462 24684 

AUAB 012160 24748 

AUAC 0121 2467 2675# 2478 

AUB 005720 1599 16024 

AUC 005742 1604 16074 

AUD 005762 1601 1606 1609 16114 
AVA 0060 1618 16214 

AVAA =: 012212 2484 24908 

AVAB =: 012250 2489 24978 

AVAC 012252 2496 24988 

AVB 006020 1622 16258 

AVC 006042 1627 16308 

AVD 006062 1624 1629 1632 16348 
AWA 006104 1641 16448 

AWAA 012272 2507s 25114 

AWAB 012322 25184 2524 2527 

AWAC 012332 2512 25208 

AWAD 012346 2521 25234 

AWAE 012352 2520 25254 

AWAS 016424 747 =. 2701 ~Ss 2704 = 33698 
Awe 006120 1645 16484 

AWC 006142 1650 16534 

AWD 006162 1647 1652,—=s«41655—Stsi«éiN 7M 
AXA 006204 1664 16678 

AXAA 0012404 2533 3.25414 

AXAB 012432 2539 49 25478 

AXAC 012434 2546 «=. 25484 

AXB 006216 1668 16708 

AYA 006230 1676 16798 

AYAA 012456 2556 25634 

AYAB —- 012502 25678 ©2571 

AYAC 012512 2561 25698 

AYB 006242 1680 16824 

ALA 006254 1689 16928 

AZAA = 012540 2577 2584a 

AZAB —-« 012576 2582 25928 

AZAC —- 012600 2590 25934 

AlB 006266 1693 16954 | 
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BDCNV 003404 11094 
BDCNVA 003424 11138-1116 
BELL = 000007 6488 
BITO = 000001 622m «1139-1249 «1253)Ss«*1254=Ss«1258)~=——«1259 
1649 1453-1454. 1723,Ss«1728~=Si«d1743—s«1784 
1842 1843 1852 1853 1869 1874 1875 
BIT1 = 000002 Sole 127512781285 146614701471 
BIT10 = 002000 6128 731-1644 «1648 = 1649Ss«*1653)—s«*1654 
BIT11 = 004000 6118 B29 
BIT12 = 010000 6108 1667 24146 2423 
BIT13 = 020000 6098 766 1679 1844 1848 1855 
BIT14 = 040000 608# 825 1692 1745 1754 1758 1769 
BIT15 = 100000 606 6078 14630 1703 1789 1793 1799 
BIT2 = 000004 6208 1140 1295 1299 1300 1304 1305 
2224 2313 «2392S «2430 «= 2675 «= :3067 = 3078 
BIT3 = 000010 619 1318 1322 1323 1327 1328 = 1331 
3194 3200 3201 
BIT4 = 000020 6184 1343 1347 1348 1352 1353 1356 
3191 3196 = 3197 
BITS = 000040 617# 1550 2691 
BIT6 = 000100 6164 1367 «1371 ««1372,-s«1376~—s«1377~—Ss«21380 
2447 = 2469-2474 = 2490 2498 = 2513 2518 
2587 2593 2608 2609 2612 2656 2658 
BIT? = 000200 615a 1586 = 1925S «1928 
BIT8 = 000400 6148 14605 14609 1410 1414 1415 1418 
1897. 1902, 19092114. 2117, 3164 3193 
BIT9 = 001000 6134 = B812,—s«iB35——s«1621~=S «1625S «1626~——s 1630 
003372 1103# 1105 
003362 1051 10994 
CARMSK 001234 706# «61146 «= 3171 = 3202" «= 3205" «= 3209 = 32148 
C = 177776 6014 
CHAINN 001756 693. 825 
CHALT = 104005 6384 
CHGD1 001562 7938 
CHNA 001774 826 = 829 
CHNAA 002012 830 408334 
CHNAB 0017 B27" = B32 
CHNB 002014 81 835a 
CHR1 001236 7078 
CHR2 001240 7088 
CHR3 01242 7098 
CMPT 014334 2085 2174 2333 2381 30848 
CHPTA 014414 3085 3087 3089 3091 3093 30968 
CMPTB 014420 3095 3097" 
CNVCTR 0035 1112* 9 1115* (11278 
CRBUF 0012 7068 = 743) 746—1950% = 3053* = 3174s 
CRBUFA 001232 si93f HS 750, 1h5e thos 26848 2686* 
& 
CTRA 001246 711#@ 1141" «=«-1152" = 2068* »=—- 2074" = 2112* = 21168 
2369* 2676" 2677# 2689* 2705* 3044e 3055« 
cTRB = 001250 spuee 4069" 2077" 2115+ 2119s 2120 -2157« 
cTRc = 001252 O34 20708 2081" 2158* 21708 2310" 2328. 
CTRD 001254 714#@ 20718 «= 2084* «= 2159e 9.21738 «= 2311" = 2332s 
CURTST 001144 6734@ = B14 820 846 


3048 


2156* 
3086 
2509+ 


2377* 
23808 


3148 
2308* 
23648 


3090 
3092 


3160* 
2316* 
2373* 


3094 
3094 


SEQ 0069 


1444 
1841 


3068 


1910 
2203 


1514 
1537 


1576 
2584 


1611 


3170 
2365 
3084 


EEE ooo) 


CC 
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DATAA 003564 11428 1153 

DATCHK= 104004 637#@ «1151 «30543175 

DATTST 003532 1137# 02717-2727, 2737 274? 2757 = 2767~—s2777)~—Ss 787 = 2797 ~=— 2807 = 2817-~—S 2827 
2837 2847S s«2B57— 2867S B77)~—s 2BBZ)~—S 2897 = 2907S 2917 = 2927 2937, 2947 2957 
2967 «2977, Ss 2987 Ss «2997 3007S s«3017~—S—«3027 

DATO —-013232 2714 = 27178 

DAT1. 013250 724 27278 

DATIO 013412 2794 27978 

DATI1 013430 2804 28078 

DATI2 013446 2814 28178 

DATI3. 013464 2824 28278 

DATIG 013502 2834 28378 

DATIS 013520 2844 28478 

DATI6 «013536 2854 28578 

DATI7 013554 2864 28678 

DAT2 013266 2734 27378 

DAT20 013572 2874 28778 

DAT21 013610 2884 28878 

DAT22 013626 2894 28978 

DAT23 013644 2904 29078 

DAT24 013662 2914 29178 

DAT25 013700 2924 29278 

DAT26 013716 2934 29378 

DAT2? 013734 2944 29478 

DAT3 013304 2744 27478 

DAT3O 013752 2954 29578 

DAT31 013770 2964 29678 

DATS 006 2974 29778 

DAT33 014024 2984 29878 

DAT34 014042 2994 29978 

DAT35 014060 3004 30078 

DAT36 014076 3014 30178 

DAT37 014114 3024 30278 

DATS §=—-013322 2754 «27578 

DATS 013340 2764 27678 

DAT6 —«013356 2774 = 27778 

DAT? —- 013374 2784 27878 

DCACHE 002144 795 8684 923 1161 

DECVAL 003524 1109-11354 

DELAY = 104016 647# 1008 1903 1999 2017 2034 2052 2093 209% 2129 2132 2138 2182 
2185 203 22492712290 2341 2345. 2389 «= 2395. 2432. 2682S 2638 = 3080 

D 017101 34278 

1125-11288 
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EMTTAB 001170 6834 B56 
MO 015260 78332558 
ERCLGT 015772 238, «23188 
ERCTR 001244 7108 | 
ERDAT 016871 754 33648 ! 
ERR 001406 686 758 
ERRA 001456 761 7668 
ERRB 001542 758* 759% 762% 7638 764* 7848 | 
ERRC 001546 767s BG 
ERRD 001556 768 769% «71 7898 
ERRE 001560 760" 765" 787 7908 
ERROR = 104003 636@«:1168~=«1197,='=«*1:2210~=*«‘2228~Sté«‘i2239~S*:*é«‘iSTSSC«d2SH~SC«*Q}~Ss«‘dD7'S~=Ssi«*d12BOOC«*éCBSSti«édN 297 
1302 1307.-«1320.~2S's«*1825)=*ié«‘880~=*«d3G5~~=i«*d1350~=:«*'3SS~=Ss«13869~—s«13740=— «1379S «1396 ~—:1407 
1412. 1417,'s«*1482—~=«<‘zMRk6SOC«dKMSi*d1G56)CO1G6B)~SCO*1473—~=*«*i27BeC3492—s«d1503~=——s«*1508 ~—«1513 
1826 1831 +1836 «1852. «1565.~Sés«w1570~=S:é«~2S7S~=té«‘iSBBOOCG00)~=Ss«d1605+~=S«s«é1610=':é«i823~St«é DB 
1683 1646.=Ss«1651~=*«*26S6)~=S*«*6H9~Ss«*dHB«SC(‘SOW:SC‘i?OS:«OC1726~=C«*dN7BN~«<‘é‘CM?:~~S«*O75HSC«*O7'8N 
1771 +-1791~=«1795.~=té<‘ 81) 1823~—S(«*1B2B=Ss«*1B46)~=SsC«*BSQ~=—s«é8S7~=«*1B72~=Ssé=«‘1B7BS«éNBB3-—=«d900 
1907 1912, -«*1986.~—«s«2003-—~S—«2021=S's«08B~~=—Ss 2056 «= 2209S 2216 = 2231 = 2253-2275 229K 
2416 26202426451 477—S« 495-517: 3526 25453570 = 2589 = 2611 ~—S2620 
2637 3660 «2698 += 3074 
ERRORI= 106015 6u6#  «-753.~—=«1937Ss«1972-—s2087~—S«s«a2122,~St«=«76—Ss«B SSBB. 2703 
ERR1. 001430 696 762" 
ERXTIM 015730 2336 «33128 
ESTPCD 015606 5 32988 
ETCLGT 015657 5197 3305e 
ETXTIM 015544 5088 3292 
wd 002042 811 8418 
FORWDA 002066 B46e B50 
FORWDB 002074 8488 
GETRDY 001646 806@ 824 836 840 1183 
GRONT 002756 10128 1014 
GTBIN 003164 10634 
GTBINP 003232 1072# 1144 «2678 «= -3047—Ss«3159 
GTRDYA 001674 Bila B22 
GTROYB 001700 8128 
GTRDYC 001716 8138 168 
GTRDYD 001740 819 8218 
GTRDYX 001654 8078 «= B38 
ICTR 001152 676@ © B31*® Bah BG 
INBIN 003126 1050# 2674 3043 «3158 
INCRTN 001302 7258 = 823 
KSTART 001142 6728 806 1177" 
LOLINE 017010 1021 34168 
LINSEL 003002 10208 1181 3105 3120 3143 3156 | 
MACHER 000004 4728 «= 797* «= BO7*® ~«—«d1193e =: 1206" =—«1221* «~=—«1235* | 
= 100000 06a 
MOUTIN 014656 314931613164 
= 000240 6044 | 
NXTST 001150 675@ 806" 821 837 B41 843s 
OACNY 003300 745 749S'si«‘770~té*é‘ POPP (O10G2 «= 182M «19291933. «1964 = «1968 = 26993185 | 
003 109g* 1098* 10978 | 
67 674 75 677 70 706 «705 
710M 12 714 71602~C«CaAtité«‘ TW | 
8 965 974 1001 | 
112? 1128 ~——«*1129 | 
| 
| 
| 
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2102 2144 2191 2351 2401 3113 3130 
OVRLAY 002632 977# = 2444 2537 
OVRLYA 002642 9798 984 
OVRLYB 002662 98 85a 
PARMTS 016727 3190 34064 
PFAIL 003644 803 11578 1166 
PIND 003156 10594 1074* 
POPSP = 005726 ] 996 999 
POPSP2= 022626 anise Att 1196 1209 1224 1238 2453 2476 2497 2525 2547 2569 2592 
PRGEND 001312 7298 839 
PRGNUM 001140 6718 775 801* 1164 
PRGTAB 001156 6784 805 
PRGO 003726 678 11774 
PRGOA 003752 1170 11834 
PRG1 014422 679 31034 
PRGIA 014444 1171 31104 3114 
PRGIB 014462 3110* 31134 
PRG2 014466 680 31184 
PRG2A 014510 1172 3125@ 83137 
PRG2B 014540 3127" «631304 
PRGS 014562 681 314le 
PRG3SA 014604 1173 31484 3150 
PRGS 014620 682 31544 
PRG4A 014640 1174 3159# 3162 
PRTYO = 000000 6324 
PRTY1 = 000040 6314 
PRTY2 = 000100 630 
PRTYS = 000140 6294 
PRTY4 = 000200 6284 668 670 
PRTYS = 000240 6274 660 662 
PRTY6 = 000300 6264 
PRTY7 = 000340 483 6254 804 1366 15 1922 1949 
PSW ss = 177776 6024 796* 808« 992 366« 1562* 1922* 1949« 2448 2468 24918 2492 25148 
2542e 2564* 2585" 2586" 26578 
PTO 003152 10574 1063 1069* 
PTOP 003160 10604 1072 1078* 
PT1 003154 10584 1063* 1064* 1067* 1068* 1069 1070 
PT1P 003162 10614 1072* 1073* 1076* 1077* 1078 1079 
003654 1157 11604 
POTIT 015311 1179 sese8 
PITIT 016043 3104 5a 
P2TIT 016103 3119 33a 
P3TIT 016604 3142 3918 
P4TIT 016654 3155 33984 
RCMSK 002776 1013 10174 
RCWT 001286 7034 ° 
RESTAR 003670 11644 
RIND 003150 4 105 1053 10568 1065* _ 
RNCNT 3000 1015* 101 . 
RNGEN 404 9278 1004 
RPI 452 927 93ie 93 9408 
RPQ 454 9 4 936 937« 9418 
RSTART 714 116 11704 
RSTPC posers 9ie 9024 
RSTPSW 002 92e 899 9034 












-MAIN, 


RXCSRT 


RXLVL 
RKVTR 
SAVREG= 
SAVRG 
SCOPE = 


$T 
STPPA 
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001260 
001112 


1 
O14773 
2350 


10-JUN-80 
6454 1106 
695 8914 
6748 779 
6564 1150 
3072 3131 
7178 
6554 1027 
1466 1470* 
1524 1528* 
1586 1598 
1644 1648 
1729 17438 
1797* 1798 
1909* 1950* 
2226 2229 
2325" 2326* 
25418 2543* 
2656* 2658* 
7168 17448 
24138 2414 
6604 909 
6594 907 
6444 1099 
694 8784 
6434 1155 
1420 1433 
1670 1682 
1988 $ 05 
2337 85 
2707 3057 
6778 827 
3108 3123 
3146 34104 
1044 34244 
3182 33368 
3106 3121 
7214 1182 
6034 794 
6004 731 
3127 3128 
6428 810 
1612 1635 
2211 3075 
692 9194 
7198 811378 
685 10044 
1006, 10108 
Bee, Hos 
53 7944 
208 1005 
690 9124 
nH 9054 
3204 s¢1e0 
1138 16 
9i2e 91Sa 


~s 

oO 

oo 
cs 


sa 2s a a a 


WA] MNDOWLM SF LOvnw ~w 
- ane see to TY le tee 3 nN 
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WAN 
ee Oe mh 
w 
we 


I 


& 22s 


te eal peel oe as 


“WRT OO 
NOVWN —- @NOOuer 
ONDA SMnow wn 


on- fo 
as 


812 


1357 
1802 


3194 


816 


1381 
1829 


3198 


DOW FW UE Ow 


829 


1448 
1884 


3207 





835 


1480 
1913 


3212 


1023 


1515 
1924 


@OnNNOUUIS 


97* 


— WWPNINIRIN es oe oe oe oe 
™m 
oOo 
 ~ 


3110 


1538 
1959 


SEQ 0073 


3111 


1577 
1987 
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STPRA 002320 905 9084 
STRXD 014314 2540 $366 2583 2605 2630 ©2654 2655 30784 
STRXV = 104006 6394 $2 2560 2581 2606 2652 
STTXV = 104007 6408 445 2466 2488 2511 
SUBTEN 003444 1114 11184 
SUBTNA 003450 11198 1186 
SUBTNB 003464 1120 11234 
SVRPC 002236 878 886 8884" 
SVRPSW 002240 879 885 889e 
TEMP 001264 7184 =1025* 1039* 1040" 1041" 1043 1928* 1930 1963* 1965 
TENPWR 003510 1113" = = «1119 1123 11294 
TKB 001122 6644 
TKLVL 001132 6684 
TKS 001120 6634 
TKVTR 001130 6674 
TPB 001126 6664 956* 
TPLVL 001136 6704 
TPS 001124 6654 957 
TPVTR 001134 6698 
TX = 000000 11844 12184 
TXBUF 001106 6584 1147" 1236 1953* 1956* 1983* 1998 2916* 2033 2051* 2095" 2t31* 21378 
2184" 2206e 2225" 22468% 22708 2289% 23448 23938 2asix 2631 2681*  3050* 3069 
3079* §=S111* =5128* =. 33170 
TXCSR 001104 657# 1140" 1142 1222 1249-1253" = 1254 1258* 1259 1262* 1273 1278 1283 
1295 1299* 1300 1304* 1305 1308* 1318 1322* 1323 1327* 1328 1331* 1343 
1347" 1348 1352 1353 1356* 1367 1371* 1372 1376* 81377 1380* 1394 1405 
1409* 1410 1414* 1415 1418* 1430 1816 1821 1826 1841* 1842¢ 1843" 1852¢ 
1853* 1869" 1874* 1875* 1880* 1898 1905 1910 aS 1925 192? eke 1954 
1957 1984 2001 2015* 2019 2032* 2036 2050* 2054 2072* 2075* 2078 2079+ 
2082* 2091 2099 2114*) = 2117*# = 2127? 2135 2141 2180 = 2188 «= 2203" = 2224" okt 
2245" 2266 2267* 2287% 2312e 2313* 2317" 2318% 2323* 2324* 2329% 2339 2387 
2392% 2630" 2647 2649" 24669 2470* 2474e 24908 Grebe 2498* 2513* 2515* 25188 
2675" 2679 3041* 3045 3067* 3078" 3126* 3167 169* 3193 3196* 3200 
TXCSRT 001256 715#@ 861927" = §=61934 
TXLVL 001116 6624 916 2468 2491 
TXVTR 001114 6614 914 1038* 2520 
TYP 002456 683 9438 
TYPA 002466 9468 955 964 
TYPC 002504 948 950« 
TYPD 2532 954 9568 961 963 
TYPDAT 002576 9468 947 950 952 956 960° 962 965¢ 
TYPE = 000 6334 721 72 2 973 1020 1046 1178 3103 3107 3118 3122 3141 
3145 3154 3181 3189 
TYPES = 104001 6348 782 
TYPF 002550 951 9604 
TYPG 002562 953 9628 
TYPS 002600 9674 = 975 
TYPSA Bosese 971 9738 
‘ae a a ibe 
x = 000137 2708@ 82710 2715# 720 7258 3730 735@ 740 745@ 2750 2755#@ 2760 27658 
144 9 775@ = =62780 785@ ©2790 7958 4 8058 10 + th 2820 8928258 = 2830 
83 84548 2850 558 2860 6 # 287 8758 2880 885e 2890 8954 
905#@ 2910 915#@ 2920 9258 2930 9358 2940 945@ 2950 +47 960 
9658 2970 975@ 2980 985@ 2990 995a 00 OS# 3010 15#@ 3020 0258 
Y = 000040 7098 7100 27198 =2720 7298 §©62730 7398 40 27498 750 59@ 862760 = 27698 


| 
| 


' 
ee 
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2770 27798 = §=2780 7894 2790 2799# 2800 28094 2810 2819# 2820 28294 283 
28394 2840 28498 850 2859# 2860 28694 2870 28798 2880 28894 2890 28998 
2900 29094 2910 29198 2920 2929% 2930 +44 Saco Goto” $579 29598 296 
29694 2970 29798 2980 2989# 2990 29998 000 0094 010 019# 3020 30294 
= 017101 4698 470 472 474 476 478 480 484 486 488 490 492 494 
496 498 500 502 504 298 508 510 512 514 516 518 520 
522 524 526 528 530 53 534 536 538 540 542 544 546 
548 550 552 554 556 558 560 562 564 566 568 570 572 
574 576 578 580 582 584 586 588 590 592 594 596 6524 
6548 732 958 1032 1066 1075 1143 1149 1955 1958 2092 2128 2181 
Fed's te et 2683 2687 3046 3052 3071 3073 3165 3168 3173 3192 
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1458 1463 1541 1546 1714 1719 1734 1739 1775 1781 1806 1811 1831 1836 
1866 1888 1893 2667 2672 3036 3058 3063 


z 

Mm 

< 

at 

yn 

= 
— oe wt a a SS SS 
RRRBRRRVRVRVVVZTB BBVBVBVeVEE 


TEST 791# 2710 2720 2730 2740 2750 2760 2770 2780 2790 
2850 ghee 2870 2880 2890 2900 2910 2920 2930 2940 


280 281.) 2820 2830 2840 
$00 295 
TSTA 7918 2710 2720 2730 2740 2750 2760 2770 2780 2790 ty 
280 
295 


2960 2970 2980 2990 


0 
0 
0 2810 2820 2830 2840 
4 2860 2870 2880 2890 2900 2910 2920 2930 2940 0 2960 2970 2980 2990 
TSTAA 791# 2710 2720 2730 2740 2750 2760 2770 2780 2790 : 


2810 2820 2830 2840 
ste} 2860 2870 2880 2890 2900 2910 2920 2930 2940 


2960 °970 2980 2990 


3 3010 3020 
TYPBIN a 
TYPDEC oF 
TYPNAM 14 
TYPNUM 4 
TYPOCS rT 
TYPOCT oF 
TYPTXT oF 
SSESCA Ww 
SNEWT 14 
SSSKIP 1a 
EQUAT 14 
»HEADE Td 
KT11 14 
. SETUP 1a 
. SWRHI 4 
$ACT1 1a 
. SAPTB 4 
. SAPTH oF 
. SAPTY 14 
-SASTA oT 
-SCATC a4 
-SCATA Ws 
.$DB2D 4 
. $0820 4 
-SDIV oF 
. SEOP Tj 
. SERRO @ 
SAULT # 


mM 
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CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0077 
- SPOWE Ww 
« SRAND le 
SRODE tJ 
- $RDOC 4 
- SREAD ie 
~$R2AZ iL 
- SSAVE a 
-$SB20 a 
-$S820 a 
-$SCOP a 
-SSIZE a 
- SSUPR a 
~ STRAP LJ 
-STYPB tl 
-STYPD \e 
-STYPE is 
-STYPO ie 
-$40CA a 
-1170 a 


- ABS. 017101 000 


ERRORS DETECTED: 0 
CZDCAD.BIN,CZDCAD.LST/CRF/SOL/NL: TOC=CZDCAD.SML,CZDCAD.P11 
RUN-TIME: 43 4 SECONDS 


31 
RUN-TIME RATIO: 646/80=8.0 
CORE USED: 32k (63 PAGES) 


